!*==aa0029.spg processed by SPAG 6.70Rc at 21:09 on 9 Dec 2012 use c_precision implicit none !*--AA00294 ! !*** Start of declarations rewritten by SPAG ! !*** End of declarations rewritten by SPAG ! ! + + + VARIABLE DEFINITIONS + + + ! mnar - Maximum number of accounting regions ! range values min max ! ------------ --------- --------- ! fixed 1 memory dependent ! typical 1 10 ! ------------ --------- --------- ! ! - The maximum number of accounting regions to be handled ! by any compiled version of WERM is specified by this ! parameter variable. ! mnarpt - Maximum number of accounting region points ! ! range values min max ! ------------ --------- --------- ! fixed 2 ? ! typical 2 2 ! ------------ --------- --------- ! - The number of accounting region points to be ! handled by any compiled version of WERM is specified ! by this parameter variable. ! mnbr - Maximum number of barriers within subregions ! range values min max ! ------------ --------- --------- ! fixed 1 memory dependent ! typical 1 10 ! ------------ --------- --------- ! - The maximum number of barriers within subregions to be ! handled by any compiled version of WERM is specified ! by this parameter variable. ! mnbpt - Maximum number of barrier points ! range values min max ! ------------ --------- --------- ! fixed 2 ? ! typical 2 2 ! ------------ --------- --------- ! - The number of points which designate a barrier ! shape and location within a subregion. ! mncz - Maximum number of crop height segments ! range values min max ! ------------ --------- --------- ! fixed 1 memory dependent ! typical 5 5 ! ------------ --------- --------- ! - The number of crop height segments to be handled by any ! compiled version of WERM is specified by this parameter ! variable. (Probably should not be modified since some ! crop parameters assume there will be 5 crop height ! segments). ! mnspt - Maximum number of simulation region points ! range values min max ! ------------ --------- --------- ! fixed 2 ? ! typical 2 2 ! ------------ --------- --------- ! - The number of simulation region points to be ! handled by any compiled version of WERM is specified ! by this parameter variable. ! mnsrpt - Maximum number of subregion points ! range values min max ! ------------ --------- --------- ! fixed 2 ? ! typical 2 2 ! ------------ --------- --------- ! - The number of subregion points to be handled ! by any compiled version of WERM is specified ! by this parameter variable. ! mnsub - Maximum number of subregions ! range values min max ! ------------ --------- --------- ! fixed 1 memory dependent ! typical 1 10 ! ------------ --------- --------- ! - The maximum number of subregions to be handled by any ! compiled version of WERM is specified by this parameter ! variable. ! mnsz - Maximum number of soil layers ! range values min max ! ------------ --------- --------- ! fixed 1 memory dependent ! typical 1 100 ! ------------ --------- --------- ! - The maximum number of soil layers to be handled by any ! compiled version of WERM is specified by this parameter ! variable. ! mntime - Maximum number of timesteps per day ! range values min max ! ------------ --------- --------- ! fixed 1 1440 ! typical 24 24 ! ------------ --------- --------- ! - The number of time steps to be handled by ! any compiled version of WERM is specified ! by this parameter variable. ! mnbpls - Maximum number of biomass pools ! range values min max ! ------------ --------- --------- ! fixed 1 ? ! typical 1 ? ! ------------ --------- --------- ! - The maximum number of biomass pools for each subregion ! mndk - maximum number of decay coefficients (st,fl,bg,rt,stem no) ! range values min max ! ------------ --------- --------- ! fixed 1 3 ! typical 1 3 ! ------------ --------- --------- ! - The number of biomass decay coefficients for each subregion ! (standing mass, flat mass, buried mass, root mass, & stem_no) ! mngdpt - Maximum number of grid points in a given direction. ! range values min max ! ------------ --------- --------- ! fixed 1 30 ! typical ? 30 ! ------------ --------- --------- ! - The maximum number of grid points in a given direction ! mnrbc - The number of residue burial classes ! mnryr - Maximum number of rotation years in a management file. ! range values min max ! ------------ --------- --------- ! fixed 1 16 ! typical 2 5 ! ------------ --------- --------- ! - The maximum number of rotation years in a management file. ! The sixteenth year is used to store the monthly output ! regardless of rotation year. ! mnmon - Maximum number of months in an output file. ! range values min max ! ------------ --------- --------- ! fixed 1 13 ! typical 1 13 ! ------------ --------- --------- ! - The maximum number of months in an output file. ! The thirteenth month is used to store the annual output ! for the rotation year. ! mnopdat- Maximum number of operation dates in an output file. ! range values min max ! ------------ --------- --------- ! fixed 1 32 ! typical 1 32 ! ------------ --------- --------- ! - The maximum number of operation dates per month in an ! output file. ! The thirtysecond day is used to store the annual output ! for the current rotation year. ! mndayr- Maximum number of days read from cligen, wingen files at one time, 367 ! ------------------------------------------------------------------ !$Author: fredfox $ !$Date: 2011-04-27 10:01:11 -0500 (Wed, 27 Apr 2011) $ !$Revision: 11825 $ !$HeadURL: https://eweru-dev1.eweru.ksu.edu/svn/code/weps1/branches/WEPS_F90_update/weps.src/src/inc/precision.inc $ ! defined variables for portable checking of precision related numbers ! variables are initialized in main to make available to all subprograms