PamCAL/PamVMC/run_g3.C

// $Id: run_g4.C,v 1.0 2007/06/01 
//
// Macro for running G4PAM_VMC with 
class TGeant3; 

void run_g3(const TString& configMacro = "g3Config.C") 
{
  // Load basic libraries
  gROOT->LoadMacro("./macro/basiclibs.C");
  basiclibs();

  // Load PAMELA libs
   TString PAMLIB=gSystem->Getenv("PAM_LIB");
   gSystem->Load(PAMLIB+"/libyoda.so");
   gSystem->Load(PAMLIB+"/libDarthVader.so");
   gSystem->Load(PAMLIB+"/libPamLevel2.so");

  // Load Geant4 libraries
  
  //  gROOT->LoadMacro("./macro/PamG4Libs.C");
  //PamG4Libs();

  // Load this example libraries
  TString G4WD=gSystem->Getenv("G4WORKDIR");
  TString PLAT=gSystem->Getenv("PLATFORM");
   gSystem->Load(G4WD+"/lib/tgt_"+PLAT+"/libPam_VMC");

  // MC application
  PamVMCApplication* appl 
    = new PamVMCApplication("PAMFLUKA_VMC", "PAMELA GEANT4 VMC application");
    
   gSystem->Load("/cern/geant3/lib/tgt_linux/libgeant321");
   new TGeant3TGeo("pamg3",0);
   //   gMC->Init();
//    appl->GetPrimaryGenerator()->SetNofPrimaries(1);  
   appl->SetVerboseLevel(4);  
//    appl->ConstructGeometry();
  // Macro to run with primary = polarized optical photon
  //gROOT->LoadMacro("optPhoton.C");
  //optPhoton();  

  // Initialize MC
   appl->InitMC(configMacro);
  
  // Customise Geant4 setting after initialization:
  // Physics list
      //  ((TGeant4*)gMC)->ProcessGeantMacro("g4config2.in");
  // Visualization settings
  // ((TGeant4*)gMC)->ProcessGeantMacro("g4vis.in");

  // Run MC
   appl->RunMC(1);

      //  delete appl;

   // return 

}  
1	// $Id: run_g4.C,v 1.0 2007/06/01
2	//
3	// Macro for running G4PAM_VMC with
4	class TGeant3;
5
6	void run_g3(const TString& configMacro = "g3Config.C")
7	{
8	// Load basic libraries
9	gROOT->LoadMacro("./macro/basiclibs.C");
10	basiclibs();
11
12	// Load PAMELA libs
13	TString PAMLIB=gSystem->Getenv("PAM_LIB");
14	gSystem->Load(PAMLIB+"/libyoda.so");
15	gSystem->Load(PAMLIB+"/libDarthVader.so");
16	gSystem->Load(PAMLIB+"/libPamLevel2.so");
17
18	// Load Geant4 libraries
19
20	// gROOT->LoadMacro("./macro/PamG4Libs.C");
21	//PamG4Libs();
22
23	// Load this example libraries
24	TString G4WD=gSystem->Getenv("G4WORKDIR");
25	TString PLAT=gSystem->Getenv("PLATFORM");
26	gSystem->Load(G4WD+"/lib/tgt_"+PLAT+"/libPam_VMC");
27
28	// MC application
29	PamVMCApplication* appl
30	= new PamVMCApplication("PAMFLUKA_VMC", "PAMELA GEANT4 VMC application");
31
32	gSystem->Load("/cern/geant3/lib/tgt_linux/libgeant321");
33	new TGeant3TGeo("pamg3",0);
34	// gMC->Init();
35	// appl->GetPrimaryGenerator()->SetNofPrimaries(1);
36	appl->SetVerboseLevel(4);
37	// appl->ConstructGeometry();
38	// Macro to run with primary = polarized optical photon
39	//gROOT->LoadMacro("optPhoton.C");
40	//optPhoton();
41
42	// Initialize MC
43	appl->InitMC(configMacro);
44
45	// Customise Geant4 setting after initialization:
46	// Physics list
47	// ((TGeant4*)gMC)->ProcessGeantMacro("g4config2.in");
48	// Visualization settings
49	// ((TGeant4*)gMC)->ProcessGeantMacro("g4vis.in");
50
51	// Run MC
52	appl->RunMC(1);
53
54	// delete appl;
55
56	// return
57
58	}