Pyr gives random number r in interval 0 < r < 1.

diff --git a/EVGEN/AliPythia.cxx b/EVGEN/AliPythia.cxx
index 9b50d8f88fb3c86f78feaaccccac6a02d1bf3824..be33e772f95cb24aa5ceb40743c5d1412fb39ca1 100644 (file)
--- a/EVGEN/AliPythia.cxx
+++ b/EVGEN/AliPythia.cxx
@@ -15,6 +15,9 @@
 
 /*
 $Log$
+Revision 1.22  2002/04/26 10:28:48  morsch
+Option kPyBeautyPbMNR added (N. Carrer).
+
 Revision 1.21  2002/03/25 14:46:16  morsch
 Case  kPyD0PbMNR added (N. Carrer).
 
@@ -378,7 +381,12 @@ void  AliPythia::SetDecayTable()
 #endif
 
 extern "C" {
-  Double_t pyr(Int_t*) {return sRandom->Rndm();}
+  Double_t pyr(Int_t*) 
+{
+      Float_t r;
+      do r=sRandom->Rndm(); while(0 >= r || r >= 1);
+      return r;
+}
   void pyrset(Int_t*,Int_t*) {}
   void pyrget(Int_t*,Int_t*) {}
 }