ISAJET/isajet/sstype.inc

   1 #ifndef CERNLIB_ISAJET_SSTYPE_INC
   2 #define CERNLIB_ISAJET_SSTYPE_INC
   3 *
   4 *
   5 * sstype.inc
   6 *
   7 C          SM ident code definitions. These are standard ISAJET but
   8 C          can be changed.
   9       INTEGER IDUP,IDDN,IDST,IDCH,IDBT,IDTP
  10       INTEGER IDNE,IDE,IDNM,IDMU,IDNT,IDTAU
  11       INTEGER IDGL,IDGM,IDW,IDZ,IDH
  12       PARAMETER (IDUP=1,IDDN=2,IDST=3,IDCH=4,IDBT=5,IDTP=6)
  13       PARAMETER (IDNE=11,IDE=12,IDNM=13,IDMU=14,IDNT=15,IDTAU=16)
  14       PARAMETER (IDGL=9,IDGM=10,IDW=80,IDZ=90,IDH=81)
  15 C          SUSY ident code definitions. They are chosen to be similar
  16 C          to those in versions < 6.50 but may be changed.
  17       INTEGER ISUPL,ISDNL,ISSTL,ISCHL,ISBT1,ISTP1
  18       INTEGER ISNEL,ISEL,ISNML,ISMUL,ISNTL,ISTAU1
  19       INTEGER ISUPR,ISDNR,ISSTR,ISCHR,ISBT2,ISTP2
  20       INTEGER ISNER,ISER,ISNMR,ISMUR,ISNTR,ISTAU2
  21       INTEGER ISZ1,ISZ2,ISZ3,ISZ4,ISW1,ISW2,ISGL
  22       INTEGER ISHL,ISHH,ISHA,ISHC
  23       INTEGER ISGRAV
  24       PARAMETER (ISUPL=21,ISDNL=22,ISSTL=23,ISCHL=24,ISBT1=25,ISTP1=26)
  25       PARAMETER (ISNEL=31,ISEL=32,ISNML=33,ISMUL=34,ISNTL=35,ISTAU1=36)
  26       PARAMETER (ISUPR=41,ISDNR=42,ISSTR=43,ISCHR=44,ISBT2=45,ISTP2=46)
  27       PARAMETER (ISNER=51,ISER=52,ISNMR=53,ISMUR=54,ISNTR=55,ISTAU2=56)
  28       PARAMETER (ISGL=29)
  29       PARAMETER (ISZ1=30,ISZ2=40,ISZ3=50,ISZ4=60,ISW1=39,ISW2=49)
  30       PARAMETER (ISHL=82,ISHH=83,ISHA=84,ISHC=86)
  31       PARAMETER (ISGRAV=91)
  32
  33 #endif