1 |
* |
2 |
* $Id$ |
3 |
* |
4 |
* $Log$ |
5 |
* |
6 |
* |
7 |
* gpg10c.inc |
8 |
* |
9 |
*CMZ : 2.03/00 30/10/2000 10.56.19 by Francesco Cafagna |
10 |
*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola |
11 |
*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna |
12 |
*CMZ : 1.02/00 10/03/97 12.52.13 by Francesco Cafagna |
13 |
*CMZ : 1.00/02 15/03/96 17.37.18 by Francesco Cafagna |
14 |
*-- Author : Francesco Cafagna 14/03/96 |
15 |
C |
16 |
C Common storing the Special tracking parameter for tracking media G10C |
17 |
C |
18 |
REAL CUTGAMG10C,CUTELEG10C,CUTNEUG10C,CUTHADG10C,CUTMUOG10C, |
19 |
+ BCUTEG10C,BCUTMG10C,DCUTMG10C,PPCUTMG10C,PAIRG10C, |
20 |
+ COMPG10C,PHOTG10C,PFISG10C,DRAYG10C,ANNIG10C,BREMG10C, |
21 |
+ HADRG10C,MUNUG10C,DCAYG10C,LOSSG10C,MULSG10C,BIRK1G10C, |
22 |
+ BIRK2G10C,BIRK3G10C,LABSG10C,SYNCG10C,STRAG10C |
23 |
* |
24 |
COMMON /GPCG10C/ CUTGAMG10C,CUTELEG10C,CUTNEUG10C,CUTHADG10C, |
25 |
+ CUTMUOG10C,BCUTEG10C,BCUTMG10C,DCUTMG10C, |
26 |
+ PPCUTMG10C,PAIRG10C,COMPG10C,PHOTG10C,PFISG10C, |
27 |
+ DRAYG10C,ANNIG10C,BREMG10C,HADRG10C,MUNUG10C, |
28 |
+ DCAYG10C,LOSSG10C,MULSG10C,BIRK1G10C,BIRK2G10C, |
29 |
+ BIRK3G10C,LABSG10C,SYNCG10C,STRAG10C |