]> git.uio.no Git - u/mrichter/AliRoot.git/commitdiff
git://git.uio.no / u / mrichter / AliRoot.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (from parent 1: 9778caa)
Dummy routine PYPTFS introduced.
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Wed, 18 Mar 2009 19:21:55 +0000 (19:21 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Wed, 18 Mar 2009 19:21:55 +0000 (19:21 +0000)
PYTHIA6/pythia6214.f patch | blob | blame | history

diff --git a/PYTHIA6/pythia6214.f b/PYTHIA6/pythia6214.f
index 9d7fe25f0801c43929f38d95dd61dd2f3e22c4b9..a330661efd6c1b90f6a39fb94d3a4a41975e411c 100644 (file)
--- a/PYTHIA6/pythia6214.f
+++ b/PYTHIA6/pythia6214.f
@@ -45412,7 +45412,7 @@ C...Commonblocks.
       SAVE /PYJETS/,/PYDAT1/,/PYDAT2/,/PYDAT3/,/PYINT4/
 C...Local array.
       DIMENSION PS(2,6),IJOIN(100)
- 
+      write(6,*) "<-PYEXEC", MDCY(PYCOMP(310), 1), MSTJ(22)
 C...Initialize and reset.
       MSTU(24)=0
       IF(MSTU(12).GE.1) CALL PYLIST(0)
@@ -59713,3 +59713,8 @@ C...Common code to ensure right century.
  
       RETURN
       END
+
+      SUBROUTINE PYPTFS(MODE,PTMAX,PTMIN,PTGEN)
+C     DUMMY       
+      RETURN
+      END