/*
 * 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_EFPIINTH_H
#define FH2H_EFPIINTH_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 EFPIINTH_INCLUDED
/*common piinth was here*/
#define EFPIINTH_INCLUDED
#endif


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

extern struct piinth_common {
  int    npartl;
  int    ipint[50];
  float  pint[50][3];
  float  xint[50][3];
  int    ipiori[50];
  int    looppi;
} piinth_;
#ifndef NO_EXTERN_COMMON_POINTERS
extern struct piinth_common *piinth;
#endif
#ifdef STATIC_COMMON_POINTERS
static struct piinth_common *piinth = &piinth_;
#endif


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


#ifndef NO_STATIC_DATA


#endif  /* #ifndef NO_STATIC_DATA */


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


#ifdef __cplusplus
}
#endif


#endif  /* #ifndef FH2H_EFPIINTH_H */