# test of venus

    {
       gROOT.Reset();

      //  dynamically link Venus shared libraries
       gSystem.Load("/user/brun/venus/venus.sl");
       gSystem.Load("/user/brun/root/lib/libEG.sl");

      //  Initialize Venus object
      TVenus *v = new TVenus("Hadron",10,82,207,82,207,200.,kTRUE,kTRUE,0.,8.,0.,0.);
      v->SetTitle("Venus5.21: Pb--Pb 200 GeV");

      //  Open ROOT output file
      TFile f("venus4.root","RECREATE");

      //  Generate a few events
      char tag[16];
      for (Int_t i = 1; i<101; i++) {
         v->GenerateEvent("All");
         sprintf(tag,"event%d",i);
         v->SetName(tag);
         v->Write();
         f.ls();
      }

      //  close output file
      f.Write();
      f.Close();
    }