| 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 |  |