C++ Interface to Tauola
HEPEVT-STANDARD.h
1C this is the hepevt class in old style. No d_h_ class pre-name
2 INTEGER NMXHEP
3 PARAMETER (NMXHEP=2000)
4 REAL*8 phep, vhep ! to be real*4/ *8 depending on host
5 INTEGER nevhep,nhep,isthep,idhep,jmohep,
6 $ jdahep
7 COMMON /hepevt/
8 $ nevhep, ! serial number
9 $ nhep, ! number of particles
10 $ isthep(nmxhep), ! status code
11 $ idhep(nmxhep), ! particle ident KF
12 $ jmohep(2,nmxhep), ! parent particles
13 $ jdahep(2,nmxhep), ! childreen particles
14 $ phep(5,nmxhep), ! four-momentum, mass [GeV]
15 $ vhep(4,nmxhep) ! vertex [mm]
16* ----------------------------------------------------------------------
17 LOGICAL qedrad
18 COMMON /phoqed/
19 $ qedrad(nmxhep) ! Photos flag
20* ----------------------------------------------------------------------
21 SAVE hepevt,phoqed