1 C*******************************************************
2 C ---------------------------------------------------------------------
3 C The stdhep event common
4 C ---------------------------------------------------------------------
5 C This is the "official" event common of the HEP community for MC events.
6 C NEVHEP = event number
7 C NHEP = number of particles ("lines")
8 C ISTHEP(N) = stability code; 0 if stable, 1 if decays.
9 C IDHEP(I) = particle ID code; see PDG '92, III.73
10 C JMOHEP(1,I) = line number of mother particle
11 C JMOHEP(2,I) = line number of last mother particle, if formed by string
12 C JDAHEP(1,I) = line number of 1st daughter particle
13 C JDAHEP(2,I) = line number of last daughter particle - MUST BE CONSECUTIVE!
14 C PHEP(5,I) = px,py,pz,E,m of particle
15 C VHEP(4,I) = x,y,z,L of production vertex
17 INTEGER nmxhep ! maximum number of particles
18 PARAMETER ( nmxhep=4000)
19 REAL*8 phep, vhep ! to be real*4 or *8 depending on host
20 INTEGER nevhep,nhep,isthep,idhep,jmohep,
23 $ nevhep, ! serial number
24 $ nhep, ! number of particles
25 $ isthep(nmxhep), ! status code
26 $ idhep(nmxhep), ! particle ident KF
27 $ jmohep(2,nmxhep), ! parent particles
28 $ jdahep(2,nmxhep), ! childreen particles
29 $ phep(5,nmxhep), ! four-momentum, mass [GeV]
30 $ vhep(4,nmxhep) ! vertex [mm]
34 c$$$ INTEGER NMXHEP,NEVHEP,NHEP,ISTHEP,IDHEP,JMOHEP,JDAHEP
36 c$$$ PARAMETER (NMXHEP=2000)
37 c$$$ COMMON/STDHEP/NEVHEP,NHEP,ISTHEP(NMXHEP),IDHEP(NMXHEP),
38 c$$$ *JMOHEP(2,NMXHEP),JDAHEP(2,NMXHEP),PHEP(5,NMXHEP),VHEP(4,NMXHEP)