00001 void na49geomfile() { 00002 // Before executing this macro, the file makegeometry.C must have been executed 00003 // 00004 gBenchmark->Start("geometry"); 00005 TFile na("na49.root","RECREATE"); 00006 TGeometry *n49 =(TGeometry*)gROOT->FindObject("na49"); 00007 n49->Write(); 00008 na.Write(); 00009 gBenchmark->Show("geometry"); 00010 }