ISAJET/isajet/isalnk.inc

   1 #ifndef CERNLIB_ISAJET_ISALNK_INC
   2 #define CERNLIB_ISAJET_ISALNK_INC
   3 *
   4 *
   5 * isalnk.inc
   6 *
   7       INTEGER NVD,MQREF,MPQREF
   8       PARAMETER (NVD=100)
   9       PARAMETER (MQREF=200)
  10       PARAMETER (MPQREF=10)
  11       COMMON/ISALNK/LVD(NVD),QREF(MQREF),PQREF(MPQREF)
  12       SAVE /ISALNK/
  13       INTEGER LVD          ! vertex links
  14       INTEGER QREF         ! initial and final parton links
  15       INTEGER PQREF        ! links to primary jets
  16
  17 #endif