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)