f1ed284
#! /bin/sh /usr/share/dpatch/dpatch-run
f1ed284
## 221-use-double-in-hepevt.dpatch by Kevin B. McCarty <kmccarty@debian.org>
f1ed284
##
f1ed284
## All lines beginning with `## DP:' are a description of the patch.
f1ed284
## DP: Use double-precision values in hepevt.inc.
f1ed284
f1ed284
@DPATCH@
f1ed284
diff -urNad mclibs-2006.dfsg.2~/src/mclibs/isajet/isajet/hepevt.inc mclibs-2006.dfsg.2/src/mclibs/isajet/isajet/hepevt.inc
f1ed284
--- mclibs-2006.dfsg.2~/src/mclibs/isajet/isajet/hepevt.inc	1998-04-02 06:47:34.000000000 -0800
f1ed284
+++ mclibs-2006.dfsg.2/src/mclibs/isajet/isajet/hepevt.inc	2008-02-06 12:56:20.000000000 -0800
f1ed284
@@ -9,7 +9,7 @@
f1ed284
       COMMON/HEPEVT/NEVHEP,NHEP,ISTHEP(NMXHEP),IDHEP(NMXHEP),
f1ed284
      $JMOHEP(2,NMXHEP),JDAHEP(2,NMXHEP),PHEP(5,NMXHEP),VHEP(4,NMXHEP)
f1ed284
       INTEGER NEVHEP,NHEP,ISTHEP,IDHEP,JMOHEP,JDAHEP
f1ed284
-      REAL PHEP,VHEP
f1ed284
+      DOUBLE PRECISION PHEP,VHEP
f1ed284
       SAVE /HEPEVT/
f1ed284
 C...      NEVHEP       - event number
f1ed284
 C...      NHEP         - number of entries in this event