! This head file is used for storing management state variables ! This common block contains the variables used in the MANAGEMENT process subproblem ! From mproc.inc real ospeed0, odir0, ostdspeed0,ominspeed0,omaxspeed0 real tdepth0,tlayer0,ti0,tstddepth0,tmindepth0,tmaxdepth0 common / till0 / ospeed0, odir0, ostdspeed0,ominspeed0,omaxspeed0, & & tdepth0, tlayer0, ti0, & & tstddepth0, tmindepth0, tmaxdepth0 ! ! This common block consists of variables that contain the crop ! property values that are "eventually" going to be moved into the ! "decomp" pools. ! From tcrop.inc real atmstandstem0(mnsub) !added state real atmstandleaf0(mnsub) !added state real atmstandstore0(mnsub) !added state real atmflatstem0(mnsub) !added state real atmflatleaf0(mnsub) !added state real atmflatstore0(mnsub) !added state real atmflatrootstore0(mnsub) !added state real atmflatrootfiber0(mnsub) !added state real atmbgstemz0(mnsz,mnsub) !added state real atmbgleafz0(mnsz,mnsub) !added state real atmbgstorez0(mnsz,mnsub) !added state real atmbgrootstorez0(mnsz,mnsub) !added state real atmbgrootfiberz0(mnsz,mnsub) !added state real atzht0(mnsub) !changed from tczht state real atdstm0(mnsub) !changed from tcdstm state real atxstmrep0(mnsub) !changed from tcxstmrep state real atzrtd0(mnsub) !changed from tczrtd state real atgrainf0(mnsub) !added state common / tcrop0 / & & atmstandstem0, atmstandleaf0, atmstandstore0, & & atmflatstem0, atmflatleaf0, atmflatstore0, & & atmflatrootstore0, atmflatrootfiber0, & & atmbgstemz0, atmbgleafz0, atmbgstorez0, & & atmbgrootstorez0, atmbgrootfiberz0, & & atzht0, atdstm0, atxstmrep0, atzrtd0, atgrainf0 ! DECOMP.INC ! ! These local variables are used by ! the decomposition submodel DECOMP, DECINI, DECHRV, AND DECOUT ! subroutines ! Variables that need to be maintained by subregion are ! arrayed be mnsub real aqua0 real covfact0(mnbpls,mnsub) real cumddf0(mnbpls,mnsub) real cumddg0(mnsz, mnbpls,mnsub) real cumdds0(mnbpls,mnsub) real ddsthrsh0(mnbpls,mnsub) real diddf0 real diddg0(mnsz) real didds0 real ditca0 real ditcg0(mnsz) real diwcf0 real diwcg0(mnsz) real diwcs0 real diwcsy0(mnsub) real dkrate0(mndk,mnbpls, mnsub) real adresevapa0(mnbpls,mnsub) real adresevapb0(mnbpls,mnsub) common / decom0 / & & aqua0, covfact0, cumddf0, cumddg0, cumdds0, & & ddsthrsh0, diddf0, diddg0, didds0, & & ditca0, ditcg0, diwcf0, diwcg0, diwcs0, diwcsy0, & & dkrate0, adresevapa0, adresevapb0