Definition at line 3 of file sim_gg.C.
References PndMultiField::AddField(), Bool_t, Cave, ctime, Dipole, Double_t, Drc, Emc, evtGen, fField, fRun, gDebug, kParameterMerged, Magnet, map_d1, map_d2, map_s1, map_s2, map_s3, map_s4, map_t, Mvd, nEvents, output, Par, Pipe, primGen, printf(), rootlogon(), rtdb, rtime, seed, PndEmc::SetGeometryFileNameDouble(), PndMultiFieldPar::SetParameters(), timer, Tof, and Tpc.
5 gRandom->SetSeed(
seed);
11 gROOT->LoadMacro(
"$VMCWORKDIR/gconfig/rootlogon.C");
14 FairRunSim *
fRun =
new FairRunSim();
19 fRun->SetName(TransportModel);
21 fRun->SetOutputFile(simdatei);
26 fRun->SetMaterials(
"media_pnd.geo");
31 Cave->SetGeometryFileName(
"pndcave.geo");
32 fRun->AddModule(Cave);
35 Magnet->SetGeometryFileName(
"FullSolenoid.root");
36 fRun->AddModule(Magnet);
39 Dipole->SetGeometryFileName(
"dipole.geo");
40 fRun->AddModule(Dipole);
43 Pipe->SetGeometryFileName(
"pipe.geo");
44 fRun->AddModule(Pipe);
50 FairDetector *
Tpc =
new PndTpcDetector(
"TPC", kTRUE);
51 Tpc->SetGeometryFileName(
"tpc.geo");
55 Mvd->SetGeometryFileName(
"MVD_v1.0_woPassiveTraps.root");
64 FairDetector *
Tof =
new PndTof(
"TOF",kTRUE);
65 Tof->SetGeometryFileName(
"tofbarrel.geo");
68 FairDetector *
Drc =
new PndDrc(
"DIRC", kTRUE);
69 Drc->SetGeometryFileName(
"dirc.geo");
84 FairPrimaryGenerator*
primGen =
new FairPrimaryGenerator();
85 fRun->SetGenerator(primGen);
87 FairEvtGenGenerator*
evtGen =
new FairEvtGenGenerator(input);
88 primGen->AddGenerator(evtGen);
91 fRun->SetBeamMom(pbeam);
111 fRun->SetField(fField);
119 FairRuntimeDb *
rtdb=fRun->GetRuntimeDb();
125 Par->setInputVersion(fRun->GetRunId(),1);
128 FairParRootFileIo*
output=
new FairParRootFileIo(kParameterMerged);
131 rtdb->setOutput(output);
145 printf(
"RealTime=%f seconds, CpuTime=%f seconds\n",rtime,ctime);
printf("RealTime=%f seconds, CpuTime=%f seconds\n", rtime, ctime)
void SetParameters(FairField *field)
FairParRootFileIo * output
FairPrimaryGenerator * primGen
FairEvtGenGenerator * evtGen
void AddField(FairField *field)
virtual void SetGeometryFileNameDouble(TString fname, TString fname2, Int_t fwbwchoice=0, TString geoVer="0")