/* * 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_POSINNUC_H #define FH2H_POSINNUC_H #ifdef __cplusplus extern "C" { #endif #ifndef IMPLICIT #define IMPLICIT /* Only to point out implicit types */ #endif /*------ fortran header (without commons and data statements) ----------*/ #ifndef POSINNUC_INCLUDED /*common posinnuc was here*/ #define POSINNUC_INCLUDED #endif /*------ common blocks -------------------------------------------------*/ extern struct posinnuc_common { int ibound; float posnuc[MAXVC][3]; } posinnuc_; #ifndef NO_EXTERN_COMMON_POINTERS extern struct posinnuc_common *posinnuc; #endif #ifdef STATIC_COMMON_POINTERS static struct posinnuc_common *posinnuc = &posinnuc_; #endif /*------ data statements -----------------------------------------------*/ #ifndef NO_STATIC_DATA #endif /* #ifndef NO_STATIC_DATA */ /*------ end of fortran header -----------------------------------------*/ #ifdef __cplusplus } #endif #endif /* #ifndef FH2H_POSINNUC_H */