/* * 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_NRNUCLPARAM_H #define FH2H_NRNUCLPARAM_H #ifdef __cplusplus extern "C" { #endif #ifndef IMPLICIT #define IMPLICIT /* Only to point out implicit types */ #endif /*------ fortran header (without commons and data statements) ----------*/ /* add common block used to scale to 16O*/ /*common nrtaerget was here*/ /* DATA APN/16./ */ /* DATA AP/8./ */ /*------ common blocks -------------------------------------------------*/ extern struct nrtaerget_common { float apn; float ap; float nrc; float nra; float nrcnn; float nrann; float nrdr; float nraf; float nrcc2; float nrdfact; float nrrmsrad; float nrwparm; float nrpfsurf; } nrtaerget_; #ifndef NO_EXTERN_COMMON_POINTERS extern struct nrtaerget_common *nrtaerget; #endif #ifdef STATIC_COMMON_POINTERS static struct nrtaerget_common *nrtaerget = &nrtaerget_; #endif /*------ data statements -----------------------------------------------*/ #ifndef NO_STATIC_DATA #endif /* #ifndef NO_STATIC_DATA */ /*------ end of fortran header -----------------------------------------*/ #ifdef __cplusplus } #endif #endif /* #ifndef FH2H_NRNUCLPARAM_H */