Removing warnings (icc)
authorhristov <hristov@f7af4fe6-9843-0410-8265-dc069ae4e863>
Thu, 15 Jan 2004 17:30:27 +0000 (17:30 +0000)
committerhristov <hristov@f7af4fe6-9843-0410-8265-dc069ae4e863>
Thu, 15 Jan 2004 17:30:27 +0000 (17:30 +0000)
PYTHIA6/pythia6203.f

index 89de20179a08a02edd60b140cb55076370006cc0..95d27a321e3f66ceedbcfb27a1c8a670c00d895c 100644 (file)
@@ -273,7 +273,7 @@ C...and particle, decay and process data.
 C...Double precision and integer declarations.
       IMPLICIT DOUBLE PRECISION(A-H, O-Z)
       IMPLICIT INTEGER(I-N)
-      INTEGER PYK,PYCHGE,PYCOMP
+C PH      INTEGER PYK,PYCHGE,PYCOMP
 C...Commonblocks.
       COMMON/PYDAT1/MSTU(200),PARU(200),MSTJ(200),PARJ(200)
       COMMON/PYDAT2/KCHG(500,4),PMAS(500,4),PARF(2000),VCKM(4,4)