From: morsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Date: Mon, 11 Sep 2000 13:23:37 +0000 (+0000)
Subject: Write last seed to file (fortran lun 50) and reed back from same lun using calls to
X-Git-Url: http://git.uio.no/git/?a=commitdiff_plain;h=b78ff279b962e53f466bdf5da73ad12e35e609ab;p=u%2Fmrichter%2FAliRoot.git

Write last seed to file (fortran lun 50) and reed back from same lun using calls to
luget_hijing and luset_hijing.
---

diff --git a/EVGEN/AliGenHijing.cxx b/EVGEN/AliGenHijing.cxx
index 4f0eaf1f2cc..252f7da66d3 100644
--- a/EVGEN/AliGenHijing.cxx
+++ b/EVGEN/AliGenHijing.cxx
@@ -15,6 +15,9 @@
 
 /*
 $Log$
+Revision 1.5  2000/09/07 16:55:40  morsch
+fHijing->Initialize(); after change of parameters. (Dmitri Yurevitch Peressounko)
+
 Revision 1.4  2000/07/11 18:24:56  fca
 Coding convention corrections + few minor bug fixes
 
@@ -94,7 +97,10 @@ void AliGenHijing::Init()
     fHijing->SetIHPR2(6,  fShadowing);
     fHijing->SetIHPR2(12, fDecaysOff);    
     fHijing->SetIHPR2(21, fKeep);
+    fHijing->Rluset(50,0);
     fHijing->Initialize();
+
+    
 //
     if (fEvaluate) EvaluateCrossSections();
 }
@@ -203,6 +209,7 @@ void AliGenHijing::Generate()
 	    }
 	}
     } // event loop
+    fHijing->Rluget(50,-1);
 }
 
 Bool_t AliGenHijing::KinematicSelection(TParticle *particle)