gpamela/gpcdes/gpmed.inc

*
* $Id$
*
* $Log$
*
*
* gpmed.inc
*
*CMZ :  3.00/00 20/03/2001  17.31.38  by  Marialuigia Ambriola
*CMZ :  2.02/00 09/10/2000  15.33.16  by  Francesco Cafagna
*CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola
*CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna
*CMZ :  1.02/00 10/03/97  12.52.13  by  Francesco Cafagna
*CMZ :  1.00/02 06/02/96  12.55.04  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   05/12/95
C
C Common with tracking media definition
C
       INTEGER MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,MCF,MSIC,
     +         MSIT,MG10,MCE,MW,MAL,ISVOLGP
*EM:
       INTEGER MW2,MCER,MG10C
*END EM.
       REAL    FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP
       COMMON /GPCMED/ MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,
     +              MCF,MSIC,MSIT,MG10,MCE,MW,MAL,ISVOLGP,
     +              FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP,
*EM:
     +                MW2,MCER,MG10C
*END EM.
C
1	cafagna	3.1	*
2			* $Id$
3			*
4			* $Log$
5			*
6			*
7			* gpmed.inc
8			*
9			*CMZ : 3.00/00 20/03/2001 17.31.38 by Marialuigia Ambriola
10			*CMZ : 2.02/00 09/10/2000 15.33.16 by Francesco Cafagna
11			*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola
12			*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna
13			*CMZ : 1.02/00 10/03/97 12.52.13 by Francesco Cafagna
14			*CMZ : 1.00/02 06/02/96 12.55.04 by Francesco Cafagna
15			*-- Author : Francesco Cafagna 05/12/95
16			C
17			C Common with tracking media definition
18			C
19			INTEGER MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,MCF,MSIC,
20			+ MSIT,MG10,MCE,MW,MAL,ISVOLGP
21			*EM:
22			INTEGER MW2,MCER,MG10C
23			*END EM.
24			REAL FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP
25			COMMON /GPCMED/ MN2,MSCIN,MAER,MXE,MKAP,MTRAD,MMAG,MROA,
26			+ MCF,MSIC,MSIT,MG10,MCE,MW,MAL,ISVOLGP,
27			+ FIELDMGP,TMAXFDGP,STEMAXGP,DEEMAXGP,EPSILGP,STMINGP,
28			*EM:
29			+ MW2,MCER,MG10C
30			*END EM.
31			C