00001 C*******************************************************
00002 C ---------------------------------------------------------------------
00003 C The stdhep event common
00004 C ---------------------------------------------------------------------
00005 C This is the "official" event common of the HEP community for MC events.
00006 C NEVHEP = event number
00007 C NHEP = number of particles ("lines")
00008 C ISTHEP(N) = stability code; 0 if stable, 1 if decays.
00009 C IDHEP(I) = particle ID code; see PDG '92, III.73
00010 C JMOHEP(1,I) = line number of mother particle
00011 C JMOHEP(2,I) = line number of last mother particle, if formed by string
00012 C JDAHEP(1,I) = line number of 1st daughter particle
00013 C JDAHEP(2,I) = line number of last daughter particle - MUST BE CONSECUTIVE!
00014 C PHEP(5,I) = px,py,pz,E,m of particle
00015 C VHEP(4,I) = x,y,z,L of production vertex
00016
00017 INTEGER nmxhep ! maximum number of particles
00018 PARAMETER ( nmxhep=4000)
00019 REAL*8 phep, vhep ! to be real*4 or *8 depending on host
00020 INTEGER nevhep,nhep,isthep,idhep,jmohep,
00021 $ jdahep
00022 COMMON /hepevt/
00023 $ nevhep, ! serial number
00024 $ nhep, ! number of particles
00025 $ isthep(nmxhep), ! status code
00026 $ idhep(nmxhep), ! particle ident KF
00027 $ jmohep(2,nmxhep), ! parent particles
00028 $ jdahep(2,nmxhep), ! childreen particles
00029 $ phep(5,nmxhep), ! four-momentum, mass [GeV]
00030 $ vhep(4,nmxhep) ! vertex [mm]
00031
00032
00033
00034 c$$$ INTEGER NMXHEP,NEVHEP,NHEP,ISTHEP,IDHEP,JMOHEP,JDAHEP
00035 c$$$ REAL PHEP,VHEP
00036 c$$$ PARAMETER (NMXHEP=2000)
00037 c$$$ COMMON/STDHEP/NEVHEP,NHEP,ISTHEP(NMXHEP),IDHEP(NMXHEP),
00038 c$$$ *JMOHEP(2,NMXHEP),JDAHEP(2,NMXHEP),PHEP(5,NMXHEP),VHEP(4,NMXHEP)
00039 c$$$ SAVE /STDHEP/
