Warning, /include/isajet/sugpas.inc is written in an unsupported language. File is not indexed.
0001 #ifndef CERNLIB_ISAJET_SUGPAS_INC
0002 #define CERNLIB_ISAJET_SUGPAS_INC
0003 *
0004 *
0005 * sugpas.inc
0006 *
0007 COMMON /SUGPAS/ XTANB,MSUSY,AMT,MGUT,MU,G2,GP,V,VP,XW,
0008 $A1MZ,A2MZ,ASMZ,FTAMZ,FBMZ,B,SIN2B,FTMT,G3MT,VEV,HIGFRZ,
0009 $FNMZ,AMNRMJ,NOGOOD,IAL3UN,ITACHY
0010 REAL XTANB,MSUSY,AMT,MGUT,MU,G2,GP,V,VP,XW,
0011 $A1MZ,A2MZ,ASMZ,FTAMZ,FBMZ,B,SIN2B,FTMT,G3MT,VEV,HIGFRZ,
0012 $FNMZ,AMNRMJ
0013 INTEGER NOGOOD,IAL3UN,ITACHY
0014 SAVE /SUGPAS/
0015
0016 #endif
