Fix from rev. 40001, avoids partons boosted by PYROBO endlessly:
authorhristov <hristov@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 6 May 2011 15:41:48 +0000 (15:41 +0000)
committerhristov <hristov@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 6 May 2011 15:41:48 +0000 (15:41 +0000)
Brute force initialisation of V(,) array at the beginning of each event
solves floating point exception (big number in V(4)).
Probably a MSTU(33) = 1 at the right position would do the same job.

PYTHIA6/pythia6.4.25/pythia-6.4.25.f

index be6c5d1..5634bfa 100644 (file)
@@ -3583,6 +3583,11 @@ C...Stop if no subprocesses on.
         CALL PYSTOP(1)
       ENDIF
  
+      DO 2 I = 1, 4000
+         DO 1 J = 1, 5
+            V(I,J) = 0.
+ 1       ENDDO
+ 2    ENDDO
 C...Initial values for some counters.
       MSTU(1)=0
       MSTU(2)=0