c begin include file cenrpa1.inc c + + + COMMON BLOCK DESCRIPTION + + + c + + + INSERT DESCRIPTION HERE + + + c NOTE : ENRPA1 is used in SR ROUTE. common /enrpa1/ frcflw(mxpart,mxelem) c + + + VARIABLE DECLARATIONS + + + real frcflw c + + + VARIABLE DEFINITIONS + + + c frcflw(mxpart,mxelem) : fraction of each particle type c end include file cenrpa1.inc