gpamela/gpcdes/gpcal.inc

*
* $Id$
*
* $Log$
*
*
* gpcal.inc
*
*CMZ :  2.01/00 05/04/2000  14.35.17  by  Marialuigia Ambriola
*CMZ :  2.00/00 03/03/2000  15.39.05  by  Francesco Cafagna
*CMZ :  1.02/00 22/10/99  16.31.02  by  Francesco Cafagna
*CMZ :  1.00/02 13/03/96  17.29.46  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   14/02/96
*
* Common with CWN variable for CASI
*
      INTEGER NTHCAL,ICAPL,ICASI,ICAST
      REAL  XINCAL,YINCAL,ZINCAL,ERELCAL
      COMMON /GPCCASI/ NTHCAL,ICAPL(NHMCAL),ICASI(NHMCAL),ICAST(NHMCAL),
     +                XINCAL(NHMCAL),YINCAL(NHMCAL),
     +                ZINCAL(NHMCAL),ERELCAL(NHMCAL)
*
1	cafagna	3.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			*