Filled if ZAUCLU is called. Note that not all words are filled (in particular the arrays with momenta of tracks in jets and their counters are not). These words are marked by a *. The values marked with a + are filled by a call to ZAUPRN. Always use the variable IJET as a pointer in this common-block (as loop index or otherwise)
REAL JETTYP(MAXJET), ! jettype (LUND flavour code, -ve if it is
! a jet that contains tracks from a
! heavy flavour decay, but there is another
! jet that contains more tracks from the
! same decay, ie. if the jet is a 'minority
! h.f. jet')
. THJET(MAXJET), ! theta
. PHIJET(MAXJET), ! phi
. PJET(5,MAXJET), ! momentum,E, and mass of jets
. EJETC(MAXJET), ! charged Energy of jet
. EJETN(MAXJET), ! neutral Energy of jet
. PIJET(MAXTRK,MAXJET), !*momenta of all particles in the jet
. MXP(MAXJET), !*max momentum of any particle in the jet
. HF1DEC(3,MAXJET), !+1:st heavy flavour decay point
. HF2DEC(3,MAXJET), !+sec. heavy flavour decay point
. HFCHP(4,MAXJET), !+sum p of decay-products of h.f.
. HFP1(MAXJET), !+1:st heavy flavour momentum
. HFP2(MAXJET) !+sec. heavy flavour momentum
INTEGER IJET, ! Main pointer in this common. Always use it
! when referring to jets
. NJTRK(MAXJET), ! number of particles in the jet
. NJTRKC(MAXJET), ! number of charged particles in the jet
. NJTRKN(MAXJET), ! number of neutral particles in the jet
. PIJETP(MAXTRK,MAXJET), !*x-reference between PIJET array and ZATRS
! common.
. MTRCLO(MAXJET), !*tracks in primary, or from close sec. vert.
. NTRVER(MAXJET), !*tracks in prim. vertex in this jet
. MXPJ(MAXJET), !*pointer in ZATRS to track w/ highest p in
! jet.
. JETFL, ! (second jet-flavour algorithm, not used)
. DC1(MAXJET), !+decay-class of 1:st h.f. decay
. DC2(MAXJET), !+decay-class of 2:nd h.f. decay
. NHFP(MAXJET) !+number of h.f. decay products