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 |
printf("---> Config()\n"); |
9 |
// gSystem->Load("libG4phys_builders"); |
10 |
gSystem->Load("libG4physicslists"); |
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"<<std::endl; |
17 |
PamG4RunConfiguration* runConfiguration |
18 |
= new PamG4RunConfiguration("geomRoot","FTFP_BERT"); |
19 |
|
20 |
printf("Config() :: runConfiguration created\n"); |
21 |
|
22 |
TGeant4* geant4 |
23 |
= new TGeant4("TGeant4_PAMELA", "The Geant4 PAMELA Monte Carlo", runConfiguration); |
24 |
|
25 |
printf("Config() :: TGeant4 object created\n"); |
26 |
|
27 |
//std::cout<<"TGeant config created..."<<std::endl; |
28 |
geant4->ProcessGeantMacro(PAM_VMC+"/config/g4config.in"); |
29 |
//std::cout<<"TGeant macro g4config.in processed..."<<std::endl; |
30 |
|
31 |
printf("<--- Config()\n"); |
32 |
} |