1 |
* |
2 |
* $Id$ |
3 |
* |
4 |
* $Log$ |
5 |
* |
6 |
* |
7 |
* gpcal.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 16.31.02 by Francesco Cafagna |
12 |
*CMZ : 1.00/02 13/03/96 17.29.46 by Francesco Cafagna |
13 |
*-- Author : Francesco Cafagna 14/02/96 |
14 |
* |
15 |
* Common with CWN variable for CASI |
16 |
* |
17 |
INTEGER NTHCAL,ICAPL,ICASI,ICAST |
18 |
REAL XINCAL,YINCAL,ZINCAL,ERELCAL |
19 |
COMMON /GPCCASI/ NTHCAL,ICAPL(NHMCAL),ICASI(NHMCAL),ICAST(NHMCAL), |
20 |
+ XINCAL(NHMCAL),YINCAL(NHMCAL), |
21 |
+ ZINCAL(NHMCAL),ERELCAL(NHMCAL) |
22 |
* |