/*
$Log$
+Revision 1.1 2002/07/05 13:10:07 morsch
+First commit of Fluka interface.
+
*/
#include "AliFluka.h"
ClassImp(AliFluka)
+
+void AliFluka::Init()
+{
+ printf("TFluka::Init \n\n");
+}
+
+
void AliFluka::ProcessRun(Int_t nevent)
{
//
// Process the run
//
- Int_t todo = TMath::Abs(nevent);
- for (Int_t i=0; i<todo; i++) {
- // Process one run (one run = one event)
+ printf("TFluka::ProcessRun \n\n");
+
+ Int_t todo = TMath::Abs(nevent);
+ for (Int_t i=0; i<todo; i++) {
+ // Process one run (one run = one event)
gAlice->BeginEvent();
ProcessEvent();
gAlice->FinishEvent();
//
// Process one event
//
+ printf("TFluka::ProcessEvent \n\n");
gAlice->Generator()->Generate();
+
+//
+//
+//
+
}
+
+
+
class AliFluka : public TFluka
{
public:
- AliFluka(const char *name, const char *title)
- {TFluka(name, title);}
+ AliFluka(const char *title)
+ :TFluka(title){}
AliFluka() {;}
virtual ~AliFluka() {;}
+ virtual void Init();
virtual void ProcessRun(Int_t nevent);
virtual void ProcessEvent();
private:
class TFluka : public AliMC
{
public:
- TFluka(const char *name, const char *title)
- {AliMC(name, title);}
+ TFluka(const char *title)
+ :AliMC("TFluka", title) {;}
TFluka() {;}
virtual ~TFluka() {;}
// Control Methods
- virtual void Init()
- {printf("Init not yet implemented !\n");
- }
virtual void FinishGeometry()
{printf("FinishGeometry not yet implemented !\n");}