gpamela/gpcdes/gpfe.inc

*
* $Id$
*
* $Log$
*
*
* gpfe.inc
*
*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 15/03/96  17.37.18  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   14/03/96
C
C Common storing the Special tracking parameter for tracking media FE
C
      REAL CUTGAMFE,CUTELEFE,CUTNEUFE,CUTHADFE,CUTMUOFE,
     +     BCUTEFE,BCUTMFE,DCUTMFE,PPCUTMFE,PAIRFE,
     +     COMPFE,PHOTFE,PFISFE,DRAYFE,ANNIFE,BREMFE,
     +     HADRFE,MUNUFE,DCAYFE,LOSSFE,MULSFE,BIRK1FE,
     +     BIRK2FE,BIRK3FE,LABSFE,SYNCFE,STRAFE
*
      COMMON /GPCFE/ CUTGAMFE,CUTELEFE,CUTNEUFE,CUTHADFE,
     +                 CUTMUOFE,BCUTEFE,BCUTMFE,DCUTMFE,
     +                 PPCUTMFE,PAIRFE,COMPFE,PHOTFE,PFISFE,
     +                 DRAYFE,ANNIFE,BREMFE,HADRFE,MUNUFE,
     +                 DCAYFE,LOSSFE,MULSFE,BIRK1FE,BIRK2FE,
     +                 BIRK3FE,LABSFE,SYNCFE,STRAFE
1	cafagna	3.1	*
2			* $Id$
3			*
4			* $Log$
5			*
6			*
7			* gpfe.inc
8			*
9			*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola
10			*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna
11			*CMZ : 1.02/00 10/03/97 12.52.13 by Francesco Cafagna
12			*CMZ : 1.00/02 15/03/96 17.37.18 by Francesco Cafagna
13			*-- Author : Francesco Cafagna 14/03/96
14			C
15			C Common storing the Special tracking parameter for tracking media FE
16			C
17			REAL CUTGAMFE,CUTELEFE,CUTNEUFE,CUTHADFE,CUTMUOFE,
18			+ BCUTEFE,BCUTMFE,DCUTMFE,PPCUTMFE,PAIRFE,
19			+ COMPFE,PHOTFE,PFISFE,DRAYFE,ANNIFE,BREMFE,
20			+ HADRFE,MUNUFE,DCAYFE,LOSSFE,MULSFE,BIRK1FE,
21			+ BIRK2FE,BIRK3FE,LABSFE,SYNCFE,STRAFE
22			*
23			COMMON /GPCFE/ CUTGAMFE,CUTELEFE,CUTNEUFE,CUTHADFE,
24			+ CUTMUOFE,BCUTEFE,BCUTMFE,DCUTMFE,
25			+ PPCUTMFE,PAIRFE,COMPFE,PHOTFE,PFISFE,
26			+ DRAYFE,ANNIFE,BREMFE,HADRFE,MUNUFE,
27			+ DCAYFE,LOSSFE,MULSFE,BIRK1FE,BIRK2FE,
28			+ BIRK3FE,LABSFE,SYNCFE,STRAFE