debug statement in call to event listing added
authormorsch <andreas.morsch@cern.ch>
Mon, 6 Oct 2014 09:47:14 +0000 (11:47 +0200)
committermorsch <andreas.morsch@cern.ch>
Mon, 6 Oct 2014 09:47:14 +0000 (11:47 +0200)
HERWIG/herwig6510.f

index 5e42a79..3b38f34 100644 (file)
@@ -60421,6 +60421,7 @@ C---CHECK FOR FATAL ERROR
         IF (NEGWTS.AND.EVWGT.LT.ZERO) NNEGEV=NNEGEV-1
 C---PRINT FIRST MAXPR EVENTS
       ELSEIF (NEVHEP.LE.MAXPR) THEN
+         write(6,*) "Calling HWUEPR", NEVHEP, MAXPR
         CALL HWUEPR
       END IF
       END