/[PAMELA software]/trieste/pamVMC/flukaConfig.C
ViewVC logotype

Contents of /trieste/pamVMC/flukaConfig.C

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1.1.1 - (show annotations) (download) (vendor branch)
Wed Mar 4 12:51:02 2009 UTC (15 years, 8 months ago) by pamelats
Branch: MAIN, pamVMC
CVS Tags: start, v0r00, HEAD
Changes since 1.1: +0 -0 lines
File MIME type: text/plain
Test pamVMC

1 static Int_t eventsPerRun = 100;
2 enum PprGeo_t
3 {
4 kHoles, kNoHoles
5 };
6
7 enum PprRad_t
8 {
9 kGluonRadiation, kNoGluonRadiation
10 };
11
12 enum PprMag_t
13 {
14 k2kG, k4kG, k5kG
15 };
16
17
18 // This part for configuration
19 static PprGeo_t sgeo = kHoles;
20 static PprRad_t srad = kGluonRadiation;
21 static PprMag_t smag = k5kG;
22
23 // Comment line
24 static TString comment;
25
26 // Functions
27 Float_t EtaToTheta(Float_t arg);
28
29
30 void Config()
31 {
32 cout << "==> Config.C..." << endl;
33
34 // Set Random Number seed
35 // gRandom->SetSeed(771967.);
36 // cout<<"Seed for random number generation= "<<gRandom->GetSeed()<<endl;
37
38
39
40 // libraries required by fluka21
41
42 Bool_t isFluka = kTRUE;
43 if (isFluka) {
44 gSystem->Load("libGeom");
45 cout << "\t* Loading TFluka..." << endl;
46 // gSystem->Load("libTFluka");
47 gSystem->Load("libfluka");
48
49 cout << "\t* Instantiating TFluka..." << endl;
50 new TFluka("C++ Interface to Fluka", 0/*verbositylevel*/);
51 //new TFluka("C++ Interface to Fluka", 4);
52 }
53 else {
54 cout << "\t* Loading Geant3..." << endl;
55 gSystem->Load("libgeant321");
56
57 cout << "\t* Instantiating Geant3TGeo..." << endl;
58 new TGeant3TGeo("C++ Interface to Geant3");
59 }
60
61 // Physics process control
62
63 // gMC->SetProcess("DCAY",1);
64 // gMC->SetProcess("PAIR",1);
65 // gMC->SetProcess("COMP",1);
66 // gMC->SetProcess("PHOT",1);
67 // gMC->SetProcess("PFIS",0);
68 // gMC->SetProcess("DRAY",1);
69 // gMC->SetProcess("ANNI",1);
70 // gMC->SetProcess("BREM",1);
71 // gMC->SetProcess("MUNU",1);
72 // gMC->SetProcess("CKOV",1);
73 // gMC->SetProcess("HADR",1);
74 // gMC->SetProcess("LOSS",2);
75 // gMC->SetProcess("MULS",1);
76 // gMC->SetProcess("RAYL",1);
77
78 Float_t cut = 1.e-5; // 1MeV cut by default
79 Float_t tofmax = 1.e10;
80
81 gMC->SetCut("CUTGAM", cut);
82 gMC->SetCut("CUTELE", cut);
83 gMC->SetCut("CUTNEU", cut);
84 gMC->SetCut("CUTHAD", cut);
85 gMC->SetCut("CUTMUO", cut);
86 gMC->SetCut("BCUTE", cut);
87 gMC->SetCut("BCUTM", cut);
88 gMC->SetCut("DCUTE", cut);
89 gMC->SetCut("DCUTM", cut);
90 gMC->SetCut("PPCUTM", cut);
91 gMC->SetCut("TOFMAX", tofmax);
92
93 cout << "==> Config.C is over ..." << endl;
94
95 }
96
97 Float_t EtaToTheta(Float_t arg){
98 return (180./TMath::Pi())*2.*atan(exp(-arg));
99 }
100

  ViewVC Help
Powered by ViewVC 1.1.23