c begin include file cdecvar1.inc c + + + COMMON BLOCK DESCRIPTION + + + c + + + INSERT DESCRIPTION HERE + + + common /decvar1/ cuthgt(ntype),oratea(ntype),orater(ntype) c + + + VARIABLE DECLARATIONS + + + real cuthgt,oratea,orater c + + + VARIABLE DEFINITIONS + + + c cuthgt(ntype) : height of post-harvest standing residue c (cut height) c oratea(ntype) : decompostition constant to calculate mass c change of above-ground biomass residue c orater(ntype) : decompostition constant to calculate mass c change of roots c end include file cdecvar1.inc