///////////////////////////////////////////////////////////////////////////// 
// set up FwDet branch in ROOT tree
//
// called from uhbook.F
//
// last modified on 23/11/2015 by I. Koenig
///////////////////////////////////////////////////////////////////////////// 

#include "cfortran.h"

#include "fwdetbookr.h"
#include "hrecevent.h"
#include "hpartialevent.h"
#include "hlinearcategory.h"
#include "hgeantmaxtrk.h"

void fwdetbookr(void) {

   HRecEvent* pHGeantEvent = (HRecEvent*)(gHades->getCurrentEvent());
                                                           // pointer to event
   HPartialEvent* pFwDet = pHGeantEvent->getPartialEvent(catSimul);

   pFwDet->addCategory(catFwDetGeantRaw,
                       new HLinearCategory("HGeantFwDet",MAXTRKFWDET*0.1) );

   printf("\n FwDet branches added\n");

}
FCALLSCSUB0(fwdetbookr,FWDETBOOKR,fwdetbookr)