//-----------------------------------------------------------------------
// environment vars WORK_DIR, TCL_FILE, SEGMENT_NUMBER
//-----------------------------------------------------------------------

int concat_stntuple(const char *request_file,const char *output_file)
{
  int      segment_number=1;

  gInterpreter->LoadMacro("./dh.C");

  cout << "Request file " << request_file << " segment " << segment_number << " output file " << output_file << endl;
  
  dh::concatenate(request_file,segment_number,output_file);
}