From 448b2720f5fe8dfb4bf4f3277c14d03e76adab8e Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@eec4d7dc-71c2-46d6-addf-10296150bf52>
Date: Fri, 28 May 2004 15:59:40 +0000
Subject: Provide symmetry interpolation.

git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/Cartoon2D/trunk@84 eec4d7dc-71c2-46d6-addf-10296150bf52
---
 interface.ccl | 59 ++++++++++++++++++++++++++++++++++++++++++++++++++---------
 1 file changed, 50 insertions(+), 9 deletions(-)

(limited to 'interface.ccl')

diff --git a/interface.ccl b/interface.ccl
index dc60934..2047b2d 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -9,18 +9,59 @@ INCLUDES HEADER: Cartoon2D.h in Cartoon2D.h
 # Function aliases:
 
 CCTK_INT FUNCTION SymmetryRegister (CCTK_STRING IN sym_name)
-USES FUNCTION SymmetryRegister
+REQUIRES FUNCTION SymmetryRegister
+
+CCTK_INT FUNCTION                                           \
+    SymmetryRegisterGrid                                    \
+        (CCTK_POINTER IN cctkGH,                            \
+         CCTK_INT IN sym_handle,                            \
+         CCTK_INT IN ARRAY which_faces,                     \ # array [N_FACES]
+         CCTK_INT IN ARRAY symmetry_zone_width)               # array [N_FACES]
+REQUIRES FUNCTION SymmetryRegisterGrid
+
+CCTK_INT FUNCTION                                           \
+    SymmetryRegisterGridInterpolator                        \
+        (CCTK_POINTER IN cctkGH,                            \
+         CCTK_INT IN sym_handle,                            \
+         CCTK_INT CCTK_FPOINTER IN symmetry_interpolate     \
+             (CCTK_POINTER_TO_CONST IN cctkGH,              \
+              CCTK_INT IN N_dims,                           \
+              CCTK_INT IN local_interp_handle,              \
+              CCTK_INT IN param_table_handle,               \
+              CCTK_INT IN coord_system_handle,              \
+              CCTK_INT IN N_interp_points,                  \
+              CCTK_INT IN interp_coords_type,               \
+              CCTK_POINTER_TO_CONST ARRAY IN interp_coords, \
+              CCTK_INT IN N_input_arrays,                   \
+              CCTK_INT ARRAY IN input_array_indices,        \
+              CCTK_INT IN N_output_arrays,                  \
+              CCTK_INT ARRAY IN output_array_types,         \
+              CCTK_POINTER ARRAY IN output_arrays,          \
+              CCTK_INT IN faces))
+REQUIRES FUNCTION SymmetryRegisterGridInterpolator
+
+CCTK_INT FUNCTION                                           \
+    SymmetryInterpolateFaces                                \
+        (CCTK_POINTER_TO_CONST IN cctkGH,                   \
+         CCTK_INT IN N_dims,                                \
+         CCTK_INT IN local_interp_handle,                   \
+         CCTK_INT IN param_table_handle,                    \
+         CCTK_INT IN coord_system_handle,                   \
+         CCTK_INT IN N_interp_points,                       \
+         CCTK_INT IN interp_coords_type,                    \
+         CCTK_POINTER_TO_CONST ARRAY IN interp_coords,      \
+         CCTK_INT IN N_input_arrays,                        \
+         CCTK_INT ARRAY IN input_array_indices,             \
+         CCTK_INT IN N_output_arrays,                       \
+         CCTK_INT ARRAY IN output_array_types,              \
+         CCTK_POINTER ARRAY IN output_arrays,               \
+         CCTK_INT IN faces)
+REQUIRES FUNCTION SymmetryInterpolateFaces
+
 
-CCTK_INT FUNCTION                                  \
-    SymmetryRegisterGrid                           \
-         (CCTK_POINTER IN cctkGH,                  \
-          CCTK_INT IN sym_handle,                  \
-          CCTK_INT IN ARRAY which_faces,           \
-          CCTK_INT IN ARRAY symmetry_zone_width)
-USES FUNCTION SymmetryRegisterGrid
 
 CCTK_INT FUNCTION Boundary_SelectedGVs(CCTK_POINTER_TO_CONST IN GH, \
   CCTK_INT IN array_size, CCTK_INT ARRAY OUT var_indicies, \
   CCTK_INT ARRAY OUT faces, CCTK_INT ARRAY OUT boundary_widths, \
   CCTK_INT ARRAY OUT table_handles, CCTK_STRING IN bc_name)
-USES FUNCTION Boundary_SelectedGVs
+REQUIRES FUNCTION Boundary_SelectedGVs
-- 
cgit v1.2.3