c begin include file ctcfrac.inc c + + + COMMON BLOCK DESCRIPTION + + + c + + + INSERT DESCRIPTION HERE + + + common /tcfrac/ tcf1(mxpart,mxplan) c + + + VARIABLE DECLARATIONS + + + real tcf1 c + + + VARIABLE DEFINITIONS + + + c tcf1(mxpart,mxplan) : transport capacity for each size class c end include file ctcfrac.inc