Project:/generatorMods/src/IsajetModule.cc

CDF KITS

[ source navigation ]
[ diff markup ]
[ identifier search ]
[ freetext search ]
[ file search ]

Architecture:	[ i386 ]
Version:	[ 4.10.4 ] [ 4.10.5 ] [ 4.8.4 ] [ 4.8.4l3s ] [ 4.8.5 ] [ 4.9.0 ] [ 4.9.1 ] [ 4.9.1.hpt3 ] [ 4.9.1hpt3 ] [ 4.9.1top1 ] [ 5.0.0 ] [ 5.1.0 ] [ 5.1.0beamonly ] [ 5.1.1 ] [ 5.2.0 ] [ 5.3.0 ] [ 5.3.1 ] [ 5.3.1dsp ] [ 5.3.3 ] [ 5.3.3_nt ] [ 5.3.4 ] [ 6.1.1 ] [ 6.1.1b ] [ 6.1.2 ] [ 6.1.3 ] [ 6.1.4 ] [ 6.1.4int3 ] [ 6.1.4mc ] [ 6.1.4mc_a ] [ 6.1.6 ] [ development ]

001 //--------------------------------------------------------------------------
002 // File and Version Information:
003 //      IsajetModule.cc, $Id: IsajetModule.cc,v 1.3 2002/01/28 00:13:52 rico Exp $
004 //
005 // Description:
006 //      Class IsajetModule
007 //
008 //      This is the wrapper for the Isajet Generator
009 //
010 // Environment:
011 //      Software developed for the CDFII Detector
012 //
013 // Author List:
014 //      Marjorie Shapiro                Original Author
015 // Modifications:
016 //      001 M. Shapiro Change to use pointer to bcs rather than bcs 
017 //
018 //  revision history:
019 //  -----------------
020 // *0001 Jan 24 1998 P.Murat: move bank_interface.hh from bnk/ to ybos/
021 // *0002 Jan 28 1998 P.Murat: don't copy banks in between YBOS and TRYBOS 
022 //                            any more - always work in TRYBOS record
023 // *0003 May 08 1998 P.Murat: remove YBOS-->TRYBOS bank copy once again
024 // *0004 Sep 08 1998 P.Murat: remove YBOS-->TRYBOS bank copy the 3rd time
025 // *0005 Jan 08 1999 P.Murat: clean the code up: 
026 //                            initialize Isajet on module construction
027 //                            rather than in module::event method
028 // *0006 Feb 07 1999 P.Murat: introduce new base class (GeneratorModule)
029 //                            to allow generation of piled up events
030 // Aug 30 2001 lena: add genId
031 //------------------------------------------------------------------------
032 
033 //-----------------------
034 // This Class's Header --
035 //-----------------------
036 #include "generatorMods/IsajetModule.hh"
037 
038 //-------------
039 // C Headers --
040 //-------------
041 #include <assert.h>
042 
043 //---------------
044 // C++ Headers --
045 //---------------
046 #include <iostream>
047 
048 //-------------------------------
049 // Collaborating Class Headers --
050 //-------------------------------
051 #include "BaBar/Cdf.hh"
052 #include "inc/bcs.h"
053 #include "evt/Event.hh"
054 #include "ParticleDB/hepevt.hh"
055 // #include "Framework/APPFramework.hh"
056 //------------------------------------------
057 // Fortran routines called from this code --
058 //--------------------------------------------
059 extern "C" {
060   void isajet_i_init_();
061   void isajet_i_event_();
062   void isajet_i_fin_();
063   void isahep_(int*);
064 }
065 
066 const char* IsajetModule::genId = "Isajet";
067 
068 //______________________________________________________________________________
069 IsajetModule::IsajetModule()
070   : AbsGenModule( IsajetModule::genId, "Isajet AC++ module") {}
071 
072 //_____________________________________________________________________________
073 IsajetModule::~IsajetModule() {}
074 
075 //______________________________________________________________________________
076 int IsajetModule::callGenerator(AbsEvent* event) {
077   isajet_i_event_();
078   return 0;
079 }
080 
081 //_____________________________________________________________________________
082 AppResult IsajetModule::genBeginRun(AbsEvent* run) {
083   return AppResult::OK;
084 }
085 
086 //_____________________________________________________________________________
087 AppResult IsajetModule::genEndRun(AbsEvent* run) {
088   isajet_i_fin_();
089   return AppResult::OK;
090 }
091 
092 //_____________________________________________________________________________
093 AppResult IsajetModule::genBeginJob() {
094                                         // initialize FORTRAN Isajet code
095   isajet_i_init_();
096   return AppResult::OK;
097 }
098 
099 //_____________________________________________________________________________
100 AppResult IsajetModule::genEndJob() {
101   isajet_i_fin_();
102   return AppResult::OK;
103 }
104 
105 //_____________________________________________________________________________
106 void IsajetModule::fillHepevt() {
107   int i = 1;
108   isahep_(&i);
109 }
110 
111 
112 
113 
114

[ source navigation ]

[ diff markup ]

[ identifier search ]

[ freetext search ]

[ file search ]

This page was automatically generated by the LXR engine.

The LXR team

Send problems or questions to cdfcode@fnal.gov