diff options
-rw-r--r-- | interface.ccl | 25 | ||||
-rw-r--r-- | src/make.code.defn | 3 |
2 files changed, 27 insertions, 1 deletions
diff --git a/interface.ccl b/interface.ccl index b0fde1d..fd56fcb 100644 --- a/interface.ccl +++ b/interface.ccl @@ -99,6 +99,31 @@ void FUNCTION EOS_Omni_RestMassDensityFromEpsPress(CCTK_INT IN eoskey, \ PROVIDES FUNCTION EOS_Omni_RestMassDensityFromEpsPress WITH EOS_Omni_EOS_RestMassDensityFromEpsPress LANGUAGE Fortran ################################################################################ +# short and long and specific calls + +void FUNCTION EOS_Omni_short(CCTK_INT IN eoskey, \ + CCTK_INT IN havetemp, \ + CCTK_REAL IN rf_precision, \ + CCTK_INT IN npoints, \ + CCTK_REAL IN ARRAY rho, \ + CCTK_REAL INOUT ARRAY eps, \ + CCTK_REAL INOUT ARRAY temp, \ + CCTK_REAL IN ARRAY ye, \ + CCTK_REAL OUT ARRAY press, \ + CCTK_REAL OUT ARRAY entropy, \ + CCTK_REAL OUT ARRAY cs2, \ + CCTK_REAL OUT ARRAY dedt, \ + CCTK_REAL OUT ARRAY dpderho, \ + CCTK_REAL OUT ARRAY dpdrhoe, \ + CCTK_REAL OUT ARRAY munu, \ + CCTK_INT OUT ARRAY keyerr, \ + CCTK_INT OUT anyerr) + +PROVIDES FUNCTION EOS_Omni_cs2 WITH EOS_Omni_EOS_short LANGUAGE Fortran + + + +################################################################################ # the following routines are needed for MHD con2prim based on the Harm Code void FUNCTION EOS_Omni_press_f_hrho_v2_rhoW(CCTK_INT IN eoskey, \ diff --git a/src/make.code.defn b/src/make.code.defn index 9cf4ca5..c071792 100644 --- a/src/make.code.defn +++ b/src/make.code.defn @@ -2,7 +2,8 @@ # Source files in this directory SRCS = EOS_Omni_Module.F90 EOS_Omni_Startup.F90 EOS_Omni_SingleVarCalls.F90 \ - EOS_Omni_SingleVarCalls_harm.F90 EOS_Omni_Handles.c + EOS_Omni_SingleVarCalls_harm.F90 EOS_Omni_Handles.c \ + EOS_Omni_MultiVarCalls.F90 # Subdirectories containing source files SUBDIRS = nuc_eos |