gpamela/gpcdes/gphit.inc

*
* $Id: gphit.inc,v 3.2 2005/06/21 02:42:14 cafagna Exp $
*
* $Log: gphit.inc,v $
* Revision 3.2  2005/06/21 02:42:14  cafagna
* Major modification to the geometry and to the random number chain
*
* Revision 3.1.1.1  2002/07/11 16:01:59  cafagna
* First GPAMELA release on CVS
*
*
*
* gphit.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 20/03/97  16.04.05  by  Francesco Cafagna
*CMZ :  1.00/02 23/02/96  15.20.54  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   13/02/96
*
* Common block with the HIT definition for each detector
*
#include "gpphit.inc"
      CHARACTER*4 CHTOF,CHTRD,CHCAT,CHCAS,CHSPE,CHCAL,CHCALI,CHND
      INTEGER     NBHTOF,NBHTRD,NBHCAT,NBHCAS,NBHSPE,
     +            NBHCAL,NBHND
      REAL        OHTOF,FHTOF,OHTRD,FHTRD,OHCAT,
     +            FHCAT,OHCAS,FHCAS,OHSPE,FHSPE,OHCAL,FHCAL,
     +            OHCALI,FHCALI,OHND,FHND
*
      COMMON /GPCHIT/ CHTOF(NHTOF),CHTRD(NHTRD),
     +               CHCAT(NHCAT),CHCAS(NHCAS),CHSPE(NHSPE),
     +               CHCAL(NHCAL),CHCALI(NHCALI),CHND(NHND),
     +               NBHTOF(NHTOF),NBHTRD(NHTRD),
     +               NBHCAT(NHCAT),NBHCAS(NHCAS),NBHSPE(NHSPE),
     +               NBHCAL(NHCAL),NBHND(NHND),
     +               OHTOF(NHTOF),FHTOF(NHTOF),OHTRD(NHTRD),
     +               FHTRD(NHTRD),
     +               OHCAT(NHCAT),FHCAT(NHCAT),OHCAS(NHCAS),
     +               FHCAS(NHCAS),OHSPE(NHSPE),FHSPE(NHSPE),
     +               OHCAL(NHCAL),FHCAL(NHCAL),OHCALI(NHCALI),
     +               FHCALI(NHCALI),OHND(NHND),FHND(NHND)
*
1	cafagna	3.1	*
2	cafagna	3.3	* $Id: gphit.inc,v 3.2 2005/06/21 02:42:14 cafagna Exp $
3	cafagna	3.2	*
4			* $Log: gphit.inc,v $
5	cafagna	3.3	* Revision 3.2 2005/06/21 02:42:14 cafagna
6			* Major modification to the geometry and to the random number chain
7			*
8	cafagna	3.2	* Revision 3.1.1.1 2002/07/11 16:01:59 cafagna
9			* First GPAMELA release on CVS
10	cafagna	3.1	*
11			*
12			*
13			* gphit.inc
14			*
15			*CMZ : 2.01/00 05/04/2000 14.35.17 by Marialuigia Ambriola
16			*CMZ : 2.00/00 03/03/2000 15.39.05 by Francesco Cafagna
17			*CMZ : 1.02/00 20/03/97 16.04.05 by Francesco Cafagna
18			*CMZ : 1.00/02 23/02/96 15.20.54 by Francesco Cafagna
19			*-- Author : Francesco Cafagna 13/02/96
20			*
21			* Common block with the HIT definition for each detector
22			*
23			#include "gpphit.inc"
24	cafagna	3.3	CHARACTER*4 CHTOF,CHTRD,CHCAT,CHCAS,CHSPE,CHCAL,CHCALI,CHND
25	cafagna	3.1	INTEGER NBHTOF,NBHTRD,NBHCAT,NBHCAS,NBHSPE,
26	cafagna	3.3	+ NBHCAL,NBHND
27	cafagna	3.1	REAL OHTOF,FHTOF,OHTRD,FHTRD,OHCAT,
28	cafagna	3.2	+ FHCAT,OHCAS,FHCAS,OHSPE,FHSPE,OHCAL,FHCAL,
29	cafagna	3.3	+ OHCALI,FHCALI,OHND,FHND
30	cafagna	3.1	*
31			COMMON /GPCHIT/ CHTOF(NHTOF),CHTRD(NHTRD),
32			+ CHCAT(NHCAT),CHCAS(NHCAS),CHSPE(NHSPE),
33	cafagna	3.3	+ CHCAL(NHCAL),CHCALI(NHCALI),CHND(NHND),
34	cafagna	3.1	+ NBHTOF(NHTOF),NBHTRD(NHTRD),
35			+ NBHCAT(NHCAT),NBHCAS(NHCAS),NBHSPE(NHSPE),
36	cafagna	3.3	+ NBHCAL(NHCAL),NBHND(NHND),
37	cafagna	3.1	+ OHTOF(NHTOF),FHTOF(NHTOF),OHTRD(NHTRD),
38			+ FHTRD(NHTRD),
39			+ OHCAT(NHCAT),FHCAT(NHCAT),OHCAS(NHCAS),
40			+ FHCAS(NHCAS),OHSPE(NHSPE),FHSPE(NHSPE),
41	cafagna	3.2	+ OHCAL(NHCAL),FHCAL(NHCAL),OHCALI(NHCALI),
42	cafagna	3.3	+ FHCALI(NHCALI),OHND(NHND),FHND(NHND)
43	cafagna	3.1	*