]>
Commit | Line | Data |
---|---|---|
43664a84 | 1 | void monsim(Int_t nev=20){ |
2b919384 | 2 | // Geant3 and Pythia |
3 | gSystem->Load("liblhapdf"); | |
4 | gSystem->Load("libEGPythia6"); | |
5 | gSystem->Load("libpythia6"); | |
6 | gSystem->Load("libAliPythia6"); | |
7 | gSystem->Load("libgeant321"); | |
43664a84 | 8 | // MonaLisa monitoring |
4070f709 | 9 | gSystem->Load("libNet"); |
10 | gSystem->Load("libMonaLisa"); | |
43664a84 | 11 | |
e4e752b6 | 12 | new TMonaLisaWriter("aliendb3.cern.ch", "Simulation pp", gSystem->Getenv("TEST_PLATFORMID"), gSystem->Getenv("TEST_PLATFORMID"), "global"); |
43664a84 | 13 | |
14 | gROOT->LoadMacro("sim.C"); | |
15 | sim(nev); | |
31cd34c9 | 16 | if (gMonitoringWriter) gMonitoringWriter->SendProcessingProgress(1,1,kTRUE); |
43664a84 | 17 | |
18 | // Send the size of the raw.root file | |
19 | ||
20 | FileStat_t buf; | |
21 | gSystem->GetPathInfo("./raw.root",buf); | |
22 | ||
23 | TList *valuelist = new TList(); | |
24 | valuelist->SetOwner(kTRUE); | |
25 | ||
26 | TMonaLisaValue* valdouble = new TMonaLisaValue("raw.root size",buf.fSize); | |
27 | valuelist->Add(valdouble); | |
28 | ||
31cd34c9 | 29 | if (gMonitoringWriter) gMonitoringWriter->SendParameters(valuelist); |
43664a84 | 30 | delete valuelist; |
31 | ||
0541097a | 32 | printf("#Test finished successfully#\n"); |
33 | } |