*
* $Id$
*
* $Log$
*
*
* gptoft.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 10/03/97  12.52.14  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 NTHTOFT,ITTPAR,ITTPAD
      REAL  XTTPAD,YTTPAD,ZTTPAD,
C     +      XOTTPAD,YOTTPAD,ZOTTPAD,
     +      ERTTPAD,PATTPAD
      COMMON /GPCTOFT/ NTHTOFT,ITTPAR(NHMTOF),ITTPAD(NHMTOF),
     +                XTTPAD(NHMTOF),YTTPAD(NHMTOF),ZTTPAD(NHMTOF),
C     +                XOTTPAD(NHMTOF),YOTTPAD(NHMTOF),ZOTTPAD(NHMTOF),
     +                ERTTPAD(NHMTOF),PATTPAD(NHMTOF)
*