************************************************************************** * drtups.inc * * * * last modified on 05/12/2008 by : I. Koenig * * * ************************************************************************** #include "hgeantmaxtrk.h" INTEGER*4 MAXMUL, MAXHIT PARAMETER(MAXHIT=MAXTRKMDC*7, MAXMUL=70) INTEGER*4 NHIT, MDCTRAK, LAYER REAL*4 MDCX, MDCY, MDCTHETA, MDCPHI, MDCTOF, MDCMOM COMMON /DRTUPS/ NHIT, MDCTRAK(MAXHIT), LAYER(MAXHIT), + MDCX(MAXHIT), MDCY(MAXHIT), MDCTHETA(MAXHIT), + MDCPHI(MAXHIT), MDCTOF(MAXHIT), MDCMOM(MAXHIT) INTEGER*4 MEDCOIL1, MEDCOIL2, MEDCOIL3 COMMON /MDCMED/ MEDCOIL1, MEDCOIL2, MEDCOIL3 REAL*4 PHI(4,7) COMMON /MDCWIRES/ PHI