1 |
* |
2 |
* $Id: gptrad.inc,v 3.1.1.1 2002/07/11 16:02:00 cafagna Exp $ |
3 |
* |
4 |
* $Log: gptrad.inc,v $ |
5 |
* Revision 3.1.1.1 2002/07/11 16:02:00 cafagna |
6 |
* First GPAMELA release on CVS |
7 |
* |
8 |
* |
9 |
* |
10 |
* gptrad.inc |
11 |
* |
12 |
*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola |
13 |
*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna |
14 |
*CMZ : 1.02/00 10/03/97 12.52.14 by Francesco Cafagna |
15 |
*CMZ : 1.00/02 15/03/96 17.37.18 by Francesco Cafagna |
16 |
*-- Author : Francesco Cafagna 14/03/96 |
17 |
C |
18 |
C Common storing the Special tracking parameter for tracking media TRAD |
19 |
C |
20 |
REAL CUTGAMTRAD,CUTELETRAD,CUTNEUTRAD,CUTHADTRAD,CUTMUOTRAD, |
21 |
+ BCUTETRAD,BCUTMTRAD,DCUTMTRAD,DCUTETRAD,PPCUTMTRAD,PAIRTRAD, |
22 |
+ COMPTRAD,PHOTTRAD,PFISTRAD,DRAYTRAD,ANNITRAD,BREMTRAD, |
23 |
+ HADRTRAD,MUNUTRAD,DCAYTRAD,LOSSTRAD,MULSTRAD,BIRK1TRAD, |
24 |
+ BIRK2TRAD,BIRK3TRAD,LABSTRAD,SYNCTRAD,STRATRAD |
25 |
* |
26 |
COMMON /GPCTRAD/ CUTGAMTRAD,CUTELETRAD,CUTNEUTRAD,CUTHADTRAD, |
27 |
+ CUTMUOTRAD,BCUTETRAD,BCUTMTRAD,DCUTMTRAD, |
28 |
+ DCUTETRAD, |
29 |
+ PPCUTMTRAD,PAIRTRAD,COMPTRAD,PHOTTRAD,PFISTRAD, |
30 |
+ DRAYTRAD,ANNITRAD,BREMTRAD,HADRTRAD,MUNUTRAD, |
31 |
+ DCAYTRAD,LOSSTRAD,MULSTRAD,BIRK1TRAD,BIRK2TRAD, |
32 |
+ BIRK3TRAD,LABSTRAD,SYNCTRAD,STRATRAD |