!!****if* source/pathToUnits/MyUnit/MyUnitMain/Impl2/MyUnit_data !! !! NAME !! MyUnit_data !! !! SYNOPSIS !! Module MyUnit_data !! !! DESCRIPTION !! !! Put the description of the MyUnit_data here. !! !! !! NOTES !! !! This file contains all the common data needed by functions in !! MyUnit. This data includes the runtime parameters, !! the physical !! constants or any other data needed from other unitss in the code. !! every function, all of that data is kept in this one place, which !! is assumed to be of MyUnit scope. All the data items are !! initialized by the function "MyUnit_init". !! !! The MyUnit_data in Impl1 and Impl2 !! are in some ways different otherwise they could both use the same !! MyUnit_data which could be stored one level up in the parent !! !!*** Module MyUnit_data !list of runtime paramters needed by all the functions MyUnit !these are examples integer, save :: mu_var1 real, save :: mu_var2, mu_var3, mu_var4, mu_var5 !add other unit scope variables here real, save :: mu_var6 !list of local but MyUnit scope variables end Module MyUnit_data