From 992f2843bcc5ebb9482b4a9ac44db847ad271622 Mon Sep 17 00:00:00 2001 From: morsch Date: Thu, 17 Jun 2004 15:02:35 +0000 Subject: [PATCH] pyquen added. --- PYTHIA6/AliPythia.cxx | 9 +++++++++ PYTHIA6/AliPythia.h | 1 + PYTHIA6/libpythia6.pkg | 3 ++- 3 files changed, 12 insertions(+), 1 deletion(-) diff --git a/PYTHIA6/AliPythia.cxx b/PYTHIA6/AliPythia.cxx index a8bee2e083e..75e8d30105d 100644 --- a/PYTHIA6/AliPythia.cxx +++ b/PYTHIA6/AliPythia.cxx @@ -28,11 +28,13 @@ ClassImp(AliPythia) # define pycell pycell_ # define pyshow pyshow_ # define pyrobo pyrobo_ +# define pyquen pyquen_ # define type_of_call #else # define pyclus PYCLUS # define pycell PYCELL # define pyrobo PYROBO +# define pyquen PYQUEN # define type_of_call _stdcall #endif @@ -40,6 +42,7 @@ extern "C" void type_of_call pyclus(Int_t & ); extern "C" void type_of_call pycell(Int_t & ); extern "C" void type_of_call pyshow(Int_t &, Int_t &, Double_t &); extern "C" void type_of_call pyrobo(Int_t &, Int_t &, Double_t &, Double_t &, Double_t &, Double_t &, Double_t &); +extern "C" void type_of_call pyquen(Double_t &, Int_t &, Double_t &); //_____________________________________________________________________________ @@ -1199,3 +1202,9 @@ void AliPythia::Quench() // this->Pylist(1); } // end quench + +void AliPythia::Pyquen(Double_t a, Int_t ibf, Double_t b) +{ + // Igor Lokthine's quenching routine + pyquen(a, ibf, b); +} diff --git a/PYTHIA6/AliPythia.h b/PYTHIA6/AliPythia.h index 188a77da53c..8ad7ae5235e 100644 --- a/PYTHIA6/AliPythia.h +++ b/PYTHIA6/AliPythia.h @@ -57,6 +57,7 @@ class AliPythia : public TPythia6, public AliRndm virtual void Pyshow(Int_t ip1, Int_t ip2, Double_t qmax); virtual void Pyrobo(Int_t imi, Int_t ima, Double_t the, Double_t phi, Double_t bex, Double_t bey, Double_t bez); virtual void InitQuenching(Float_t bmin, Float_t bmax, Float_t k, Int_t iECMethod); + virtual void Pyquen(Double_t a, Int_t ibf, Double_t b); // return instance of the singleton static AliPythia* Instance(); diff --git a/PYTHIA6/libpythia6.pkg b/PYTHIA6/libpythia6.pkg index 07c5bbb649e..14d81dd1e9a 100644 --- a/PYTHIA6/libpythia6.pkg +++ b/PYTHIA6/libpythia6.pkg @@ -14,7 +14,8 @@ pythia6214.F \ pythia6_common_block_address.F \ pdf_alice.F\ tpythia6_called_from_cc.F\ -openDecayTable.F +openDecayTable.F\ +pyquen.F ifeq ($(ALICE_TARGET),linux) GCC_VERSION := $(shell $(CXX) -v 2>&1 | \ -- 2.43.0