c begin include file cerdva2.inc c + + + COMMON BLOCK DESCRIPTION + + + c + + + INSERT DESCRIPTION HERE + + + c NOTE : ERDVA2 is used in SR ROUTE. common /erdva2/ detach(101) c + + + VARIABLE DECLARATIONS + + + real detach c + + + VARIABLE DEFINITIONS + + + c detach(101) : unitless detachment for each point down the slope c end include file cerdva2.inc