diff options
| author | schnetter <schnetter@c3c03602-0f4f-0410-b3fa-d2c81c8a7dc5> | 2004-05-28 15:58:33 +0000 |
|---|---|---|
| committer | schnetter <schnetter@c3c03602-0f4f-0410-b3fa-d2c81c8a7dc5> | 2004-05-28 15:58:33 +0000 |
| commit | 7814896d27a90c94a6b3bc362a9b0207f70f86c8 (patch) | |
| tree | cfd7cfa65dc9856270db51daf935c29f442972cd /interface.ccl | |
| parent | 134140fb7074dab1687e9958b1cfccf72ba1f0c0 (diff) | |
Provide symmetry interpolation.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/RotatingSymmetry90/trunk@9 c3c03602-0f4f-0410-b3fa-d2c81c8a7dc5
Diffstat (limited to 'interface.ccl')
| -rw-r--r-- | interface.ccl | 57 |
1 files changed, 48 insertions, 9 deletions
diff --git a/interface.ccl b/interface.ccl index 46383d9..a011f14 100644 --- a/interface.ccl +++ b/interface.ccl @@ -10,15 +10,54 @@ USES INCLUDE HEADER: Slab.h 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, \ - CCTK_INT IN ARRAY symmetry_zone_width) -USES FUNCTION SymmetryRegisterGrid +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 @@ -30,4 +69,4 @@ CCTK_INT FUNCTION Boundary_SelectedGVs \ 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 |