1 |
* |
2 |
* $Id$ |
3 |
* |
4 |
* $Log$ |
5 |
* |
6 |
* |
7 |
* gptrad.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.14 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 TRAD |
16 |
C |
17 |
REAL CUTGAMTRAD,CUTELETRAD,CUTNEUTRAD,CUTHADTRAD,CUTMUOTRAD, |
18 |
+ BCUTETRAD,BCUTMTRAD,DCUTMTRAD,PPCUTMTRAD,PAIRTRAD, |
19 |
+ COMPTRAD,PHOTTRAD,PFISTRAD,DRAYTRAD,ANNITRAD,BREMTRAD, |
20 |
+ HADRTRAD,MUNUTRAD,DCAYTRAD,LOSSTRAD,MULSTRAD,BIRK1TRAD, |
21 |
+ BIRK2TRAD,BIRK3TRAD,LABSTRAD,SYNCTRAD,STRATRAD |
22 |
* |
23 |
COMMON /GPCTRAD/ CUTGAMTRAD,CUTELETRAD,CUTNEUTRAD,CUTHADTRAD, |
24 |
+ CUTMUOTRAD,BCUTETRAD,BCUTMTRAD,DCUTMTRAD, |
25 |
+ PPCUTMTRAD,PAIRTRAD,COMPTRAD,PHOTTRAD,PFISTRAD, |
26 |
+ DRAYTRAD,ANNITRAD,BREMTRAD,HADRTRAD,MUNUTRAD, |
27 |
+ DCAYTRAD,LOSSTRAD,MULSTRAD,BIRK1TRAD,BIRK2TRAD, |
28 |
+ BIRK3TRAD,LABSTRAD,SYNCTRAD,STRATRAD |