C COMMON /CATMOI/ NDEP COMMON /CATMOS/ GRAV,CMASS(MDEP),TEMP(MDEP),NE(MDEP), * VEL(MDEP),TAU(0:MDEP),XCONT(MDEP),SCAT(MDEP),XNORM(MDEP), * HEIGHT(MDEP) REAL NE COMMON /CATMID/ ATMOID,DPID,DPTYPE CHARACTER ATMOID*72,DPID*72,DPTYPE