PamVMC_update/config/g4Config_em.C

// $Id: g4Config.C,v 1.5 2009-06-12 18:39:13 pam-rm2 Exp $
//
// Configuration macro for Geant4 VirtualMC for PamG4VMC
// for geometry defined with Root and selected Geant4 native navigation

void Config()
{
  
  gSystem->Load("libG4phys_builders");
  gSystem->Load("libG4phys_lists");

  TString PAM_VMC=gSystem->Getenv("PAM_VMC");
  TString PLAT=gSystem->Getenv("PLATFORM");

  gSystem->Load(PAM_VMC+"/lib/tgt_"+PLAT+"/libPamG4RunConfiguration");
  //  std::cout<<PAM_VMC+"/lib/tgt_"+PLAT+"/libPamG4RunConfiguration";
  PamG4RunConfiguration* runConfiguration 
    = new PamG4RunConfiguration("geomRoot","QGSP_BIC_HP");

  TGeant4* geant4
    = new TGeant4("TGeant4_PAMELA", "The Geant4 PAMELA Monte Carlo", runConfiguration);
 
  geant4->ProcessGeantMacro(PAM_VMC+"/config/g4config_em.in");

}
1	formato	1.1	// $Id: g4Config.C,v 1.5 2009-06-12 18:39:13 pam-rm2 Exp $
2			//
3			// Configuration macro for Geant4 VirtualMC for PamG4VMC
4			// for geometry defined with Root and selected Geant4 native navigation
5
6			void Config()
7			{
8
9			gSystem->Load("libG4phys_builders");
10			gSystem->Load("libG4phys_lists");
11
12			TString PAM_VMC=gSystem->Getenv("PAM_VMC");
13			TString PLAT=gSystem->Getenv("PLATFORM");
14
15			gSystem->Load(PAM_VMC+"/lib/tgt_"+PLAT+"/libPamG4RunConfiguration");
16			// std::cout<<PAM_VMC+"/lib/tgt_"+PLAT+"/libPamG4RunConfiguration";
17			PamG4RunConfiguration* runConfiguration
18			= new PamG4RunConfiguration("geomRoot","QGSP_BIC_HP");
19
20			TGeant4* geant4
21			= new TGeant4("TGeant4_PAMELA", "The Geant4 PAMELA Monte Carlo", runConfiguration);
22
23			geant4->ProcessGeantMacro(PAM_VMC+"/config/g4config_em.in");
24
25			}