//
// global constants
//

const Int_t fNFills = 10;
// plot program for TH4D class
Int_t GetRandomTest()
{
   gSystem->Load("../../lib/libutils.so");
   //gDebug = 100;

   TFile *infile = TFile::Open("test.root", "read");
   TH4D *h4 = gROOT->FindObject("test"); 

   Double_t x, y, z, u;

   cerr << "-------------------------------------------" << endl;
   cerr << "x       y        z        u " << endl;
   cerr << "-------------------------------------------" << endl;
   for (Int_t i=0; i<fNFills; i++) {
      h4->GetRandom4(x,y,z,u);
      cerr << x << " " << y << " " << z << " " << u << endl;
   }

   //gObjectTable->Print("all");

   cerr << "(END)" << endl;
   return 0;
}