Warning, /include/isajet/wwpar.inc is written in an unsupported language. File is not indexed.
0001 #ifndef CERNLIB_ISAJET_WWPAR_INC
0002 #define CERNLIB_ISAJET_WWPAR_INC
0003 *
0004 *
0005 * wwpar.inc
0006 *
0007 COMMON/WWPAR/SWW,TWW,UWW,WM2,ZM2,P1WW(5),P2WW(5),P3WW(5),P4WW(5)
0008 $,PZERO(4,4),S13,P3(5),Q1(5),Q3(5),JQWW(2)
0009 $,CQ,CV,CA,CV1,CA1,CV3,CA3,CS,CT,CU
0010 SAVE /WWPAR/
0011 #if defined(CERNLIB_DOUBLE)
0012 #include "isajet/wwpar2.inc"
0013 * Ignoring t=pass
0014 #endif
0015 #if defined(CERNLIB_SINGLE)
0016 #include "isajet/wwpar1.inc"
0017 * Ignoring t=pass
0018 #endif
0019 INTEGER JQWW
0020
0021 #endif
