1 |
* |
* |
2 |
* $Id: gpcal.inc,v 3.2 2003/12/17 11:32:48 pamela Exp $ |
* $Id: gpcal.inc,v 3.3 2005/06/21 02:42:07 cafagna Exp $ |
3 |
* |
* |
4 |
* $Log: gpcal.inc,v $ |
* $Log: gpcal.inc,v $ |
5 |
|
* Revision 3.3 2005/06/21 02:42:07 cafagna |
6 |
|
* Major modification to the geometry and to the random number chain |
7 |
|
* |
8 |
* Revision 3.2 2003/12/17 11:32:48 pamela |
* Revision 3.2 2003/12/17 11:32:48 pamela |
9 |
* CALO SIMULATION COMPLETED: geometry and special tracking parameters updated and simulation checked by a comparison with the Trieste's standalone Monte Carlo simulation |
* CALO SIMULATION COMPLETED: geometry and special tracking parameters updated and simulation checked by a comparison with the Trieste's standalone Monte Carlo simulation |
10 |
* |
* |
33 |
+ XINCAL(NHMCAL),YINCAL(NHMCAL), |
+ XINCAL(NHMCAL),YINCAL(NHMCAL), |
34 |
+ ZINCAL(NHMCAL),ERELCAL(NHMCAL) |
+ ZINCAL(NHMCAL),ERELCAL(NHMCAL) |
35 |
C Ml: 14/03/2003 |
C Ml: 14/03/2003 |
36 |
COMMON /GPCCALI/NTHCALI,ICASTRIP(NHMCAL),ICAPLANE(NHMCAL), |
COMMON /GPCCALI/NTHCALI,ICASTRIP(NHMCALI),ICAPLANE(NHMCALI), |
37 |
+ ICAMOD(NHMCAL),ENESTRIP(NHMCAL) |
+ ICAMOD(NHMCALI),ENESTRIP(NHMCALI) |
38 |
C end Ml 14/03/2003 |
C end Ml 14/03/2003 |
39 |
* |
* |