gpamela/gpcalordes/mnutrn.inc

*KEEP,MNUTRN.
      COMMON/MNUTRN/NAME,NAMEX,E,EOLD,NMED,MEDOLD,NREG,U,V,W,
     + UOLD,VOLD,WOLD,X,Y,Z,XOLD,YOLD,ZOLD,WATE,OLDWT,WTBC,
     + BLZNT,BLZON,AGE,OLDAGE,INEU,ENE(MAXNEU)
      INTEGER BLZNT
1	cafagna	1.1	*KEEP,MNUTRN.
2			COMMON/MNUTRN/NAME,NAMEX,E,EOLD,NMED,MEDOLD,NREG,U,V,W,
3			+ UOLD,VOLD,WOLD,X,Y,Z,XOLD,YOLD,ZOLD,WATE,OLDWT,WTBC,
4			+ BLZNT,BLZON,AGE,OLDAGE,INEU,ENE(MAXNEU)
5			INTEGER BLZNT