14 theApp.TopAlg = [
"RandomNumberAlg"]
18 MessageSvc.OutputLevel = 3
24 theApp.EvtSel =
"NONE"
30 theApp.HistogramPersistency =
"ROOT"
33 NTSvc.Output = [
"FILE1 DATAFILE='NTuple.root' OPT='NEW' TYP='ROOT'"]
34 HPSvc =
Service(
"HistogramPersistencySvc")
35 HPSvc.OutputFile =
"histo.root"
37 theApp.run(theApp.EvtMax)