Avoid duplicated SAVE statements for G95

[u/mrichter/AliRoot.git] / HIJING / hijing / pyint2_hijing.inc

diff --git a/HIJING/hijing/pyint2_hijing.inc b/HIJING/hijing/pyint2_hijing.inc
index bb9333f821fd7c2ca4e1d2c2aecffc4504de92e1..fc0d3a232733d337c3e8ee1dd1ca396e2da96d90 100644 (file)
--- a/HIJING/hijing/pyint2_hijing.inc
+++ b/HIJING/hijing/pyint2_hijing.inc
@@ -2,4 +2,6 @@
       REAL COEF
       COMMON/PYINT2_HIJING/ISET(200),KFPR(200,2),COEF(200,20),ICOL(40,4
      $     ,2) 
+#ifndef BLANKET_SAVE
       SAVE /PYINT2_HIJING/ 
+#endif