]>
Commit | Line | Data |
---|---|---|
da32329d AM |
1 | void monsim(Int_t nev=20){ |
2 | // Geant3 and Pythia | |
3 | gSystem->Load("liblhapdf"); | |
4 | gSystem->Load("libEGPythia6"); | |
5 | gSystem->Load("libpythia6"); | |
6 | gSystem->Load("libAliPythia6"); | |
7 | gSystem->Load("libgeant321"); | |
8 | // MonaLisa monitoring | |
9 | gSystem->Load("libNet.so"); | |
10 | gSystem->Load("libMonaLisa.so"); | |
11 | ||
12 | new TMonaLisaWriter("aliendb3.cern.ch", "Simulation pp", gSystem->Getenv("TEST_PLATFORMID"), gSystem->Getenv("TEST_PLATFORMID"), "global"); | |
13 | ||
14 | gROOT->LoadMacro("sim.C"); | |
15 | sim(nev); | |
16 | if (gMonitoringWriter) gMonitoringWriter->SendProcessingProgress(1,1,kTRUE); | |
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 | ||
29 | if (gMonitoringWriter) gMonitoringWriter->SendParameters(valuelist); | |
30 | delete valuelist; | |
31 | ||
32 | printf("#Test finished successfully#\n"); | |
33 | } |