/*
 * 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_EFPION_H
#define FH2H_EFPION_H


#ifdef __cplusplus
extern "C" {
#endif


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


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

/**/
/*common eftarget was here*/
/*common efpars was here*/

/*     Parameters listed below are defined in nesettarg.F*/

/*      parameter(AN=16.)*/
/*      parameter(ZZ=8.)*/
/*      parameter(C=2.69)*/
/*      parameter(A=1.80)*/
/*      parameter(CNN=2.69)*/
/*      parameter(ANN=1.80)*/
/*      parameter(DR=0.05)*/
/*      parameter(AF=0.40961)*/
/*      parameter(cc2=2.5*C)*/
/*      parameter(dfact=0.9985962)*/
/*      parameter(dfact=1./(1.+EXP(-C/AF)))*/


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

extern struct eftarget_common {
  float  an;
  float  zz;
  float  c;
  float  cnn;
  float  af;
  float  cc2;
  float  dfact;
  float  rmsrad;
  float  wparm;
} eftarget_;
#ifndef NO_EXTERN_COMMON_POINTERS
extern struct eftarget_common *eftarget;
#endif
#ifdef STATIC_COMMON_POINTERS
static struct eftarget_common *eftarget = &eftarget_;
#endif

extern struct efpars_common {
  float  a;
  float  ann;
  float  dr;
} efpars_;
#ifndef NO_EXTERN_COMMON_POINTERS
extern struct efpars_common *efpars;
#endif
#ifdef STATIC_COMMON_POINTERS
static struct efpars_common *efpars = &efpars_;
#endif


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


#ifndef NO_STATIC_DATA


#endif  /* #ifndef NO_STATIC_DATA */


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


#ifdef __cplusplus
}
#endif


#endif  /* #ifndef FH2H_EFPION_H */