/* * Generated automatically by fh2h.pl * !!! DO NOT EDIT !!! * Edit the original fortran header file instead * or fix fh2h.pl if there is a translation bug. */ #ifndef FH2H_SPLITCHANOUT_H #define FH2H_SPLITCHANOUT_H #ifdef __cplusplus extern "C" { #endif #ifndef IMPLICIT #define IMPLICIT /* Only to point out implicit types */ #endif /*------ fortran header (without commons and data statements) ----------*/ /* Output information from spliTChan*/ /* also hardcoded in atmpd/src/analysis/official_ntuple/ntuple_module_fitqun.F*/ #define MAXSE (10) /* also hardcoded in atmpd/src/analysis/official_ntuple/ntuple_module_fitqun.F*/ #define NPEAKFINDS (6) /*common fitqunse was here*/ /*------ common blocks -------------------------------------------------*/ #ifndef NOSKLIBRARIES extern struct fitqunse_common { #else struct fitqunse_common { #endif int cluster_ncand; float cluster_tstart[MAXSE]; float cluster_tend[MAXSE]; int cluster_nhits[MAXSE]; float cluster_totq[MAXSE]; int cluster_goodflag[MAXSE]; int cluster_npeaks[MAXSE][NPEAKFINDS]; int cluster_ipeak[MAXSE][NPEAKFINDS][MAXSE]; float cluster_timeofpeak[MAXSE][NPEAKFINDS][MAXSE]; int muechk_ncand[NPEAKFINDS]; float muechk_toya[NPEAKFINDS]; float muechk_tpeak[NPEAKFINDS][MAXSE]; int muechk_bg[NPEAKFINDS][MAXSE]; float muechk_mean[NPEAKFINDS][MAXSE]; float muechk_excess[NPEAKFINDS][MAXSE]; float muechk_signif[NPEAKFINDS][MAXSE]; int muechk_icluster[NPEAKFINDS][MAXSE]; } fitqunse_; #ifndef NO_EXTERN_COMMON_POINTERS extern struct fitqunse_common *fitqunse; #endif #ifdef STATIC_COMMON_POINTERS static struct fitqunse_common *fitqunse = &fitqunse_; #endif /*------ data statements -----------------------------------------------*/ #ifndef NO_STATIC_DATA #endif /* #ifndef NO_STATIC_DATA */ /*------ end of fortran header -----------------------------------------*/ #ifdef __cplusplus } #endif #endif /* #ifndef FH2H_SPLITCHANOUT_H */