/*
 * 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_NEUTFILEPATH_H
#define FH2H_NEUTFILEPATH_H


#ifdef __cplusplus
extern "C" {
#endif


#ifndef IMPLICIT
#define IMPLICIT  /* Only to point out implicit types */
#endif


/*------ fortran header (without commons and data statements) ----------*/

/************************************************************************/
/**/
/*     neutfilepath.h*/
/*  */
/*     ( purpose )*/
/*       keep path name for the cross-section tables etc.*/
/*  */
/*     ( creation date and author )*/
/*       2013.Dec. ; Y.Hayato*/
/**/
/************************************************************************/


/*common neutfilepath was here*/

      


/*------ common blocks -------------------------------------------------*/

extern struct neutfilepath_common {
  char   crstblpath[1024];
} neutfilepath_;
#ifndef NO_EXTERN_COMMON_POINTERS
extern struct neutfilepath_common *neutfilepath;
#endif
#ifdef STATIC_COMMON_POINTERS
static struct neutfilepath_common *neutfilepath = &neutfilepath_;
#endif


/*------ data statements -----------------------------------------------*/


#ifndef NO_STATIC_DATA


#endif  /* #ifndef NO_STATIC_DATA */


/*------ end of fortran header -----------------------------------------*/


#ifdef __cplusplus
}
#endif


#endif  /* #ifndef FH2H_NEUTFILEPATH_H */