From: hristov <hristov@f7af4fe6-9843-0410-8265-dc069ae4e863>
Date: Sun, 20 Jun 2004 14:55:37 +0000 (+0000)
Subject: Small fix
X-Git-Url: http://git.uio.no/git/?a=commitdiff_plain;h=e47d57b2820ed769217703b8f39543fd8d74b4ed;p=u%2Fmrichter%2FAliRoot.git

Small fix
---

diff --git a/PYTHIA6/pyquen.F b/PYTHIA6/pyquen.F
index 06c2d4dbe2b..a00c8b940c2 100644
--- a/PYTHIA6/pyquen.F
+++ b/PYTHIA6/pyquen.F
@@ -132,7 +132,7 @@
       i=i0+1      
  2    ks=k(i,1)
       icount = icount + 1
-      if (icount > 200) stop
+      if (icount.gt.200) stop
       ksp=k(i-1,1) 
       if(ks.ne.2.and.ksp.ne.2) then 
          n=n+1