changed the order of call of endofcycle so that images are produced

[u/mrichter/AliRoot.git] / HIJING / hijing1_36 / hiptdi.F

diff --git a/HIJING/hijing1_36/hiptdi.F b/HIJING/hijing1_36/hiptdi.F
index 25edbb64eb333a75e8774e4fada3525c211ce8f3..bd8f68f0d9f8103af9f20203ba928732d25a0e8e 100644 (file)
--- a/HIJING/hijing1_36/hiptdi.F
+++ b/HIJING/hijing1_36/hiptdi.F
@@ -3,6 +3,7 @@ C
 C
 C
        SUBROUTINE HIPTDI(PT,PTMAX,IOPT)
+#define BLANKET_SAVE
 #include "hiparnt.inc"
        SAVE
        IF(IOPT.EQ.2) THEN