c

c     Version 1.384
c
c     Nov. 20, 2003. Vladimir Oujinski (cern) pointed out an inconsistency
c     between the variable declarations in subroutine HIJSET as in the
c     documentation. So the following
c	CHARACTER FRAME*4,PROJ*4,TARG*4,EFRAME*4
c     is changed to
c	CHARACTER FRAME*8,PROJ*8,TARG*8,EFRAME*8
c

diff --git a/HIJING/hijing1_36/hijset.F b/HIJING/hijing1_36/hijset.F
index 0e0b1b2abcf8ff603d075e935f83b2070d99223f..b92cb55215ff9b6fe3e35a73e920e24a117ecc53 100644 (file)
--- a/HIJING/hijing1_36/hijset.F
+++ b/HIJING/hijing1_36/hijset.F
@@ -3,7 +3,7 @@ C
 C
 C
        SUBROUTINE HIJSET(EFRM,FRAME,PROJ,TARG,IAP,IZP,IAT,IZT)
-       CHARACTER FRAME*4,PROJ*4,TARG*4,EFRAME*4
+       CHARACTER FRAME*8,PROJ*8,TARG*8,EFRAME*8
        DOUBLE PRECISION  DD1,DD2,DD3,DD4
 #define BLANKET_SAVE
 #include "histrng.inc"