--- gpamela/gpcdes/gpcal.inc	2002/07/11 16:01:59	3.1
+++ gpamela/gpcdes/gpcal.inc	2005/06/21 02:42:07	3.3
@@ -1,7 +1,13 @@
 *
-* $Id$
+* $Id: gpcal.inc,v 3.2 2003/12/17 11:32:48 pamela Exp $
+*
+* $Log: gpcal.inc,v $
+* Revision 3.2  2003/12/17 11:32:48  pamela
+* CALO SIMULATION COMPLETED: geometry and special tracking parameters updated and simulation checked by a comparison with the Trieste's standalone Monte Carlo simulation
+*
+* Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
+* First GPAMELA release on CVS
 *
-* $Log$
 *
 *
 * gpcal.inc
@@ -14,9 +20,17 @@
 *
 * Common with CWN variable for CASI
 *
-      INTEGER NTHCAL,ICAPL,ICASI,ICAST
+      INTEGER NTHCALI,NTHCAL,ICAPL,ICASI,ICAST
       REAL  XINCAL,YINCAL,ZINCAL,ERELCAL
-      COMMON /GPCCASI/ NTHCAL,ICAPL(NHMCAL),ICASI(NHMCAL),ICAST(NHMCAL),
+C Ml: 14/03/2003
+      INTEGER ICASTRIP,ICAPLANE,ICAMOD
+      REAL ENESTRIP
+C end Ml. 14/03/2003     
+      COMMON /GPCCAST/ NTHCAL,ICAPL(NHMCAL),ICASI(NHMCAL),ICAST(NHMCAL),
      +                XINCAL(NHMCAL),YINCAL(NHMCAL),
      +                ZINCAL(NHMCAL),ERELCAL(NHMCAL)
+C Ml: 14/03/2003
+      COMMON /GPCCALI/NTHCALI,ICASTRIP(NHMCAL),ICAPLANE(NHMCAL),
+     +                ICAMOD(NHMCAL),ENESTRIP(NHMCAL)
+C end Ml 14/03/2003
 *