From 9fd450c5ad384697b86c59be1e872b5c4adcc9fe Mon Sep 17 00:00:00 2001 From: rhaas Date: Tue, 13 Aug 2013 14:56:13 +0000 Subject: add interface use OMP version of ESO_Omni_press function From: Christian Ott git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinEvolve/GRHydro/trunk@569 c83d129a-5a75-4d5a-9c4d-ed3a5855bf45 --- interface.ccl | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/interface.ccl b/interface.ccl index da64a20..d7451a4 100644 --- a/interface.ccl +++ b/interface.ccl @@ -258,6 +258,20 @@ CCTK_INT FUNCTION EOS_Omni_GetHandle(CCTK_STRING IN name) USES FUNCTION EOS_Omni_GetHandle +void FUNCTION EOS_Omni_pressOMP(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_INT OUT ARRAY keyerr, \ + CCTK_INT OUT anyerr) + +USES FUNCTION EOS_Omni_pressOMP + void FUNCTION EOS_Omni_press(CCTK_INT IN eoskey, \ CCTK_INT IN havetemp, \ CCTK_REAL IN rf_precision, \ -- cgit v1.2.3