1 |
// $Id: g4Config.C,v 1.1.1.1 2013-10-15 15:51:32 formato 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 |
char **argv = (char**) new char*[1]; |
23 |
|
24 |
argv[0] = new char[10]; |
25 |
strcpy("PamVMC.exe", argv[0]); |
26 |
|
27 |
TGeant4* geant4 |
28 |
= new TGeant4("TGeant4_PAMELA", "The Geant4 PAMELA Monte Carlo", runConfiguration, 1, argv); |
29 |
|
30 |
printf("Config() :: TGeant4 object created\n"); |
31 |
|
32 |
//std::cout<<"TGeant config created..."<<std::endl; |
33 |
geant4->ProcessGeantMacro(PAM_VMC+"/config/g4config.in"); |
34 |
//std::cout<<"TGeant macro g4config.in processed..."<<std::endl; |
35 |
|
36 |
printf("<--- Config()\n"); |
37 |
} |