gpamela/gpcdes/gpcp.inc

*
* $Id$
*
* $Log$
*
*
* gpcp.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.19  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   14/03/96
C
C Common storing the Special tracking parameter for tracking media CP
C
      REAL CUTGAMCP,CUTELECP,CUTNEUCP,CUTHADCP,CUTMUOCP,
     +     BCUTECP,BCUTMCP,DCUTMCP,PPCUTMCP,PAIRCP,
     +     COMPCP,PHOTCP,PFISCP,DRAYCP,ANNICP,BREMCP,
     +     HADRCP,MUNUCP,DCAYCP,LOSSCP,MULSCP,BIRK1CP,
     +     BIRK2CP,BIRK3CP,LABSCP,SYNCCP,STRACP
*
      COMMON /GPCCP/ CUTGAMCP,CUTELECP,CUTNEUCP,CUTHADCP,
     +                 CUTMUOCP,BCUTECP,BCUTMCP,DCUTMCP,
     +                 PPCUTMCP,PAIRCP,COMPCP,PHOTCP,PFISCP,
     +                 DRAYCP,ANNICP,BREMCP,HADRCP,MUNUCP,
     +                 DCAYCP,LOSSCP,MULSCP,BIRK1CP,BIRK2CP,
     +                 BIRK3CP,LABSCP,SYNCCP,STRACP
1	*
2	* $Id$
3	*
4	* $Log$
5	*
6	*
7	* gpcp.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.19 by Francesco Cafagna
13	*-- Author : Francesco Cafagna 14/03/96
14	C
15	C Common storing the Special tracking parameter for tracking media CP
16	C
17	REAL CUTGAMCP,CUTELECP,CUTNEUCP,CUTHADCP,CUTMUOCP,
18	+ BCUTECP,BCUTMCP,DCUTMCP,PPCUTMCP,PAIRCP,
19	+ COMPCP,PHOTCP,PFISCP,DRAYCP,ANNICP,BREMCP,
20	+ HADRCP,MUNUCP,DCAYCP,LOSSCP,MULSCP,BIRK1CP,
21	+ BIRK2CP,BIRK3CP,LABSCP,SYNCCP,STRACP
22	*
23	COMMON /GPCCP/ CUTGAMCP,CUTELECP,CUTNEUCP,CUTHADCP,
24	+ CUTMUOCP,BCUTECP,BCUTMCP,DCUTMCP,
25	+ PPCUTMCP,PAIRCP,COMPCP,PHOTCP,PFISCP,
26	+ DRAYCP,ANNICP,BREMCP,HADRCP,MUNUCP,
27	+ DCAYCP,LOSSCP,MULSCP,BIRK1CP,BIRK2CP,
28	+ BIRK3CP,LABSCP,SYNCCP,STRACP