aboutsummaryrefslogtreecommitdiff
path: root/interface.ccl
diff options
context:
space:
mode:
authorschnetter <schnetter@c78560ca-4b45-4335-b268-5f3340f3cb52>2004-03-09 13:43:38 +0000
committerschnetter <schnetter@c78560ca-4b45-4335-b268-5f3340f3cb52>2004-03-09 13:43:38 +0000
commit1478cd3442978751eebae2ef6c23d9c3feb180f7 (patch)
tree07a291a8e9bfc81e8780416bff0df530efe66b05 /interface.ccl
parentd2e11529e75550df2c73dcc1c001908c6d3f6502 (diff)
Use the new SymBase infrastructure to find out about symmetry boundaries.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/CartGrid3D/trunk@195 c78560ca-4b45-4335-b268-5f3340f3cb52
Diffstat (limited to 'interface.ccl')
-rw-r--r--interface.ccl27
1 files changed, 27 insertions, 0 deletions
diff --git a/interface.ccl b/interface.ccl
index 3c44d2c..c18370f 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -32,6 +32,33 @@ USES FUNCTION ConvertFromPhysicalBoundary
+# Register the symmetry boundaries
+CCTK_INT FUNCTION SymmetryRegister (CCTK_STRING IN sym_name)
+USES 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]
+USES FUNCTION SymmetryRegisterGrid
+
+
+
+# Apply the symmetry boundary conditions
+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
+
+
+
public:
REAL gridspacings type=SCALAR