Common /ZAPRN/ : information on 'flying' decayed particles, ie. generally weakly decayed particles, that can be seen as secondary vertices. This common block is filled by a call to ZAUPRN
INTEGER MAXDEC ! Max Number of 'flying' decayed particles PARAMETER (MAXDEC=100) INTEGER NDEC, ! Number of 'flying' decayed ! particles . DECCL(MAXDEC), ! class of decay (cf /ZATRS/) . JETDEC(MAXDEC), ! Jet that first decay product ! belongs to . PANC(MAXDEC), ! Ultimate ancestor of particle. . PPARNB(MAXDEC), ! Pointer to parents of decayed ! particles. . KIDNB(MAXDEC,MAXDEC), ! Pointer to kids in /ZATRS/ ! (stable kids) . PKIDNB(MAXDEC,MAXDEC) ! Pointer to kids in /ZAPRN/ itself ! (unstable kids) REAL PDEC(MAXDEC), ! Momentum decayed particle . RDECP(MAXDEC), ! Radius of decay . NPROD(MAXDEC), ! Number of stable decay-products . PNPROD(MAXDEC), ! Number of unstable decay-products . PRODV(3,MAXDEC), ! decay-point . PCHP(4,MAXDEC) ! sum of true 4-momentum of decay ! products