gpamela/gpcdes/gptof.inc

*
* $Id$
*
* $Log$
*
*
* gptof.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  13.42.27  by  Francesco Cafagna
*CMZ :  1.00/02 04/04/96  15.52.53  by  Francesco Cafagna
*-- Author :    Francesco Cafagna   14/02/96
*
* Common with CWN variable for TTST and TTPL detector
*
      INTEGER NTHTOF,IPLTOF,IPADDLE,IPARTOF
      REAL    XINTOF,YINTOF,ZINTOF,XOUTTOF,YOUTTOF,ZOUTTOF,ERELTOF,
     +        TIMETOF,PATHTOF,P0TOF,XAVTOF,YAVTOF,ZAVTOF
      COMMON  /GPCTOF/ NTHTOF,IPLTOF(NHMTOF),IPADDLE(NHMTOF),
     +                IPARTOF(NHMTOF),
     +                XINTOF(NHMTOF),YINTOF(NHMTOF),ZINTOF(NHMTOF),
     +                XOUTTOF(NHMTOF),YOUTTOF(NHMTOF),ZOUTTOF(NHMTOF),
     +                ERELTOF(NHMTOF),TIMETOF(NHMTOF),PATHTOF(NHMTOF),
     +                P0TOF(NHMTOF),XAVTOF(NHMTOF),YAVTOF(NHMTOF),
     +                ZAVTOF(NHMTOF)
1	*
2	* $Id$
3	*
4	* $Log$
5	*
6	*
7	* gptof.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 13.42.27 by Francesco Cafagna
12	*CMZ : 1.00/02 04/04/96 15.52.53 by Francesco Cafagna
13	*-- Author : Francesco Cafagna 14/02/96
14	*
15	* Common with CWN variable for TTST and TTPL detector
16	*
17	INTEGER NTHTOF,IPLTOF,IPADDLE,IPARTOF
18	REAL XINTOF,YINTOF,ZINTOF,XOUTTOF,YOUTTOF,ZOUTTOF,ERELTOF,
19	+ TIMETOF,PATHTOF,P0TOF,XAVTOF,YAVTOF,ZAVTOF
20	COMMON /GPCTOF/ NTHTOF,IPLTOF(NHMTOF),IPADDLE(NHMTOF),
21	+ IPARTOF(NHMTOF),
22	+ XINTOF(NHMTOF),YINTOF(NHMTOF),ZINTOF(NHMTOF),
23	+ XOUTTOF(NHMTOF),YOUTTOF(NHMTOF),ZOUTTOF(NHMTOF),
24	+ ERELTOF(NHMTOF),TIMETOF(NHMTOF),PATHTOF(NHMTOF),
25	+ P0TOF(NHMTOF),XAVTOF(NHMTOF),YAVTOF(NHMTOF),
26	+ ZAVTOF(NHMTOF)