# Interface definition for thorn EOS_GeneralPolytrope
# $Header$

implements: EOS_GeneralPolytrope

void FUNCTION EOS_Poly_Pressure(CCTK_INT IN nelemns, \
                                    CCTK_POINTER ARRAY IN rho,\
				    CCTK_POINTER ARRAY OUT press)

PROVIDES FUNCTION EOS_Poly_Pressure WITH EOS_GP_Pressure LANGUAGE Fortran



CCTK_INT FUNCTION EOS_RegisterCall(CCTK_INT IN table_handle, \
                                   CCTK_INT IN CCTK_FPOINTER \
                                     EOS_fn(CCTK_INT IN param_table, \
                                            CCTK_INT IN n_elems, \
                                            CCTK_POINTER ARRAY IN indeps, \
                                            CCTK_INT ARRAY IN which_deps, \
                                            CCTK_POINTER ARRAY OUT deps))
USES FUNCTION EOS_RegisterCall


void FUNCTION EOS_Poly_IntEn(CCTK_INT IN nelemns, \
                                 CCTK_POINTER ARRAY IN rho,\
				 CCTK_POINTER ARRAY OUT IntEn)

PROVIDES FUNCTION EOS_Poly_IntEn WITH EOS_GP_IntEn LANGUAGE Fortran


void FUNCTION EOS_Poly_DPDRho(CCTK_INT IN nelemns, \
                                  CCTK_POINTER ARRAY IN rho,\
				  CCTK_POINTER ARRAY OUT dpdrho)

PROVIDES FUNCTION EOS_Poly_DPDrho WITH EOS_GP_DPDRho LANGUAGE Fortran


void FUNCTION EOS_Poly_DPDIE(CCTK_INT IN nelemns, \
                                 CCTK_POINTER ARRAY IN rho,\
				 CCTK_POINTER ARRAY OUT dpdie)

PROVIDES FUNCTION EOS_Poly_DPDIE WITH EOS_GP_DPDIE LANGUAGE Fortran

void FUNCTION EOS_Poly_cs2(CCTK_INT IN nelemns, \
                               CCTK_POINTER ARRAY IN rho,\
			       CCTK_POINTER ARRAY OUT cs2)

PROVIDES FUNCTION EOS_Poly_cs2 WITH EOS_GP_cs2 LANGUAGE Fortran

void FUNCTION EOS_Poly_Inv_Rho(CCTK_INT IN nelemns, \
                                   CCTK_POINTER ARRAY IN press,\
			           CCTK_POINTER ARRAY OUT rho)

PROVIDES FUNCTION EOS_Poly_Inv_Rho WITH EOS_GP_Inv_Rho LANGUAGE Fortran

void FUNCTION EOS_Poly_Inv_IntEn(CCTK_INT IN nelemns, \
                                     CCTK_POINTER ARRAY IN press,\
			             CCTK_POINTER ARRAY OUT IntEn)

PROVIDES FUNCTION EOS_Poly_Inv_IntEn WITH EOS_GP_Inv_IntEn LANGUAGE Fortran


void FUNCTION EOS_Poly_Inv_DPDRho(CCTK_INT IN nelemns, \
                                     CCTK_POINTER ARRAY IN press,\
			             CCTK_POINTER ARRAY OUT DPDRho)

PROVIDES FUNCTION EOS_Poly_Inv_DPDRho WITH EOS_GP_Inv_DPDRho LANGUAGE Fortran


void FUNCTION EOS_Poly_Inv_DPDIE(CCTK_INT IN nelemns, \
                                     CCTK_POINTER ARRAY IN press,\
			             CCTK_POINTER ARRAY OUT DPDIE)

PROVIDES FUNCTION EOS_Poly_Inv_DPDIE WITH EOS_GP_Inv_DPDIE LANGUAGE Fortran

void FUNCTION EOS_Poly_Inv_cs2(CCTK_INT IN nelemns, \
                                     CCTK_POINTER ARRAY IN press,\
			             CCTK_POINTER ARRAY OUT cs2)

PROVIDES FUNCTION EOS_Poly_Inv_cs2 WITH EOS_GP_Inv_cs2 LANGUAGE Fortran