31{
   34 
   37 
   38  try {
   39 
   40    JParser<> zap(
"Auxiliary program to print (x,y) of the maximum of 2D ROOT objects.");
 
   41    
   42    zap[
'f'] = 
make_field(inputFile,  
"<input file>:<object name>");
 
   44     
   45    zap(argc, argv);
   46  }
   47  catch(const exception &error) {
   48    FATAL(error.what() << endl);
 
   49  }
   50 
   51 
   52  for (vector<JRootObjectID>::const_iterator input = inputFile.begin(); input != inputFile.end(); ++input) {
   53 
   54    DEBUG(
"Input: " << *input << endl);
 
   55 
   57 
   58    if (dir == NULL) {
   59      ERROR(
"File: " << input->getFullFilename() << 
" not opened." << endl);
 
   60      continue;
   61    }
   62 
   63    const TRegexp regexp(input->getObjectName());
   64 
   65    TIter iter(dir->GetListOfKeys());
   66 
   67    for (TKey* key; (key = (TKey*) iter.Next()) != NULL; ) {
   68 
   69      const TString tag(key->GetName());
   70 
   71      DEBUG(
"Key: " << tag << 
" match = " << tag.Contains(regexp) << endl);
 
   72        
   73      
   74 
   75      if (tag.Contains(regexp) && 
isTObject(key)) {
 
   76 
   77        TObject* 
object = key->ReadObj();
 
   78 
   81        double zmax = numeric_limits<double>::lowest();
   82 
   83        try {
   84 
   85          TH2& h2 = dynamic_cast<TH2&>(*object);
   86 
   87          for (Int_t ix = 1; ix <= h2.GetXaxis()->GetNbins(); ++ix) {
   88            for (Int_t iy = 1; iy <= h2.GetYaxis()->GetNbins(); ++iy) {
   89 
   90              double z = h2.GetBinContent(ix,iy);
   91 
   92              if (z > zmax) {
   93                zmax = z;
   94                x    = h2.GetXaxis()->GetBinCenter(ix);
 
   95                y    = h2.GetYaxis()->GetBinCenter(iy);
 
   96              }
   97            }
   98          }
   99        }
  100        catch(exception&) {}
  101 
  102        try {
  103 
  104          TProfile2D& h2 = dynamic_cast<TProfile2D&>(*object);
  105 
  106          for (Int_t ix = 1; ix <= h2.GetXaxis()->GetNbins(); ++ix) {
  107            for (Int_t iy = 1; iy <= h2.GetYaxis()->GetNbins(); ++iy) {
  108 
  109              double z = h2.GetBinContent(ix,iy);
  110 
  111              if (z > zmax) {
  112                zmax = z;
  113                x    = h2.GetXaxis()->GetBinCenter(ix);
 
  114                y    = h2.GetYaxis()->GetBinCenter(iy);
 
  115              }
  116            }
  117          }
  118        }
  119        catch(exception&) {}
  120 
  121        try {
  122 
  123          TGraph2D& g2 = dynamic_cast<TGraph2D&>(*object);
  124 
  125          for (Int_t i = 0; i != g2.GetN(); ++i) {
  126            if (g2.GetZ()[i] > zmax) {
  127              zmax = g2.GetZ()[i];
  130            }
  131          }
  132        }
  133        catch(exception&) {}
  134 
  135        if (zmax != numeric_limits<double>::lowest()) {
  136          cout << setw(32) << left << key->GetName() << right << 
' ' << 
SCIENTIFIC(15,5) << 
x << 
' ' << 
SCIENTIFIC(15,5) << 
y << endl;
 
  137        }
  138      }
  139    }
  140  }
  141}
#define DEBUG(A)
Message macros.
 
#define make_field(A,...)
macro to convert parameter to JParserTemplateElement object
 
Utility class to parse command line options.
 
TDirectory * getDirectory(const JRootObjectID &id)
Get TDirectory pointer.
 
bool isTObject(const TKey *key)
Check if given key corresponds to a TObject.
 
This name space includes all other name spaces (except KM3NETDAQ, KM3NET and ANTARES).
 
Auxiliary data structure for floating point format specification.