Dummy routine for stand-allone use of dpmjet added.
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 29 Aug 2008 20:19:51 +0000 (20:19 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 29 Aug 2008 20:19:51 +0000 (20:19 +0000)
DPMJET/libdpmjet.pkg
DPMJET/pyqdummy.f [new file with mode: 0644]

index 9b898a9..ca30144 100644 (file)
@@ -1,5 +1,6 @@
 #-*- Mode: Makefile -*-
 
+
 SRCS:=AliDpmJetRndm.cxx
 
 HDRS= $(SRCS:.cxx=.h) 
@@ -11,7 +12,8 @@ dpmjet3.0-5.f\
 phojet1.12-35c3.f\
 pythia6115dpm3.f\
 user3.0-5.f\
-openfile.f
+openfile.f\
+pyqdummy.f
 
 ifeq (g95,$(F77))
 PACKFFLAGS := $(filter-out -O%,$(FFLAGS))
diff --git a/DPMJET/pyqdummy.f b/DPMJET/pyqdummy.f
new file mode 100644 (file)
index 0000000..c21db51
--- /dev/null
@@ -0,0 +1,5 @@
+      SUBROUTINE PYQDUMMY()
+      common /parimp/ b1,psib1,rb1,rb2,noquen 
+      common /pyqpar/ T0u,tau0u,nfu,ienglu,ianglu 
+      RETURN
+      END