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	cafagna	3.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