gpamela/gpcdes/gpch2.inc

*
*
* gpch2.inc
*
*-- Author :    Marialuigia Ambriola   27/10/2006
C
C Common storing the Special tracking parameter for tracking media CH2
C Polyethylene
C
      REAL CUTGAMCH2,CUTELECH2,CUTNEUCH2,CUTHADCH2,CUTMUOCH2,
     +     BCUTECH2,BCUTMCH2,DCUTMCH2,DCUTECH2,PPCUTMCH2,PAIRCH2,
     +     COMPCH2,PHOTCH2,PFISCH2,DRAYCH2,ANNICH2,BREMCH2,
     +     HADRCH2,MUNUCH2,DCAYCH2,LOSSCH2,MULSCH2,BIRK1CH2,
     +     BIRK2CH2,BIRK3CH2,LABSCH2,SYNCCH2,STRACH2
*     
      COMMON /GPCCH2/ CUTGAMCH2,CUTELECH2,CUTNEUCH2,CUTHADCH2,
     +                 CUTMUOCH2,BCUTECH2,BCUTMCH2,DCUTMCH2,
     +                 DCUTECH2,
     +                 PPCUTMCH2,PAIRCH2,COMPCH2,PHOTCH2,PFISCH2,
     +                 DRAYCH2,ANNICH2,BREMCH2,HADRCH2,MUNUCH2,
     +                 DCAYCH2,LOSSCH2,MULSCH2,BIRK1CH2,BIRK2CH2,
     +                 BIRK3CH2,LABSCH2,SYNCCH2,STRACH2
1	*
2	*
3	* gpch2.inc
4	*
5	*-- Author : Marialuigia Ambriola 27/10/2006
6	C
7	C Common storing the Special tracking parameter for tracking media CH2
8	C Polyethylene
9	C
10	REAL CUTGAMCH2,CUTELECH2,CUTNEUCH2,CUTHADCH2,CUTMUOCH2,
11	+ BCUTECH2,BCUTMCH2,DCUTMCH2,DCUTECH2,PPCUTMCH2,PAIRCH2,
12	+ COMPCH2,PHOTCH2,PFISCH2,DRAYCH2,ANNICH2,BREMCH2,
13	+ HADRCH2,MUNUCH2,DCAYCH2,LOSSCH2,MULSCH2,BIRK1CH2,
14	+ BIRK2CH2,BIRK3CH2,LABSCH2,SYNCCH2,STRACH2
15	*
16	COMMON /GPCCH2/ CUTGAMCH2,CUTELECH2,CUTNEUCH2,CUTHADCH2,
17	+ CUTMUOCH2,BCUTECH2,BCUTMCH2,DCUTMCH2,
18	+ DCUTECH2,
19	+ PPCUTMCH2,PAIRCH2,COMPCH2,PHOTCH2,PFISCH2,
20	+ DRAYCH2,ANNICH2,BREMCH2,HADRCH2,MUNUCH2,
21	+ DCAYCH2,LOSSCH2,MULSCH2,BIRK1CH2,BIRK2CH2,
22	+ BIRK3CH2,LABSCH2,SYNCCH2,STRACH2