1 |
* |
2 |
* $Id$ |
3 |
* |
4 |
* $Log$ |
5 |
* |
6 |
* |
7 |
* gpcat.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 22/10/99 15.17.08 by Francesco Cafagna |
12 |
*CMZ : 1.00/02 04/04/96 15.52.53 by Francesco Cafagna |
13 |
*-- Author : Francesco Cafagna 14/02/96 |
14 |
* |
15 |
* Common with CWN variable for CATT and CATL detector |
16 |
* |
17 |
INTEGER NTHCAT,IPARCAT,ICAT |
18 |
REAL XINCAT,YINCAT,ZINCAT, |
19 |
+ XOUTCAT,YOUTCAT,ZOUTCAT, |
20 |
+ ERELCAT,TIMECAT,PATHCAT,P0CAT |
21 |
COMMON /GPCCAT/ NTHCAT,IPARCAT(NHMCAT),ICAT(NHMCAT), |
22 |
+ XINCAT(NHMCAT),YINCAT(NHMCAT),ZINCAT(NHMCAT), |
23 |
+ XOUTCAT(NHMCAT),YOUTCAT(NHMCAT),ZOUTCAT(NHMCAT), |
24 |
+ ERELCAT(NHMCAT),TIMECAT(NHMCAT),PATHCAT(NHMCAT), |
25 |
+ P0CAT(NHMCAT) |
26 |
* |