aboutsummaryrefslogtreecommitdiff
path: root/ML_BSSN_Helper/src
diff options
context:
space:
mode:
authorErik Schnetter <schnetter@cct.lsu.edu>2008-08-04 11:52:07 -0500
committerErik Schnetter <schnetter@cct.lsu.edu>2008-08-04 11:52:07 -0500
commitecf86b57b550bee257906fc7407f602fbf47d7e1 (patch)
treee52398aae88c12e743fcaf9db2ea3885afb099ea /ML_BSSN_Helper/src
parent823afa433a88cb83b9a8124391a1c26d4d1726bd (diff)
Do not register the grid function symmetries in the helper thorns since
Kranc does this on its own. Correct instead an error in Kranc which registers the symmetries too late.
Diffstat (limited to 'ML_BSSN_Helper/src')
-rw-r--r--ML_BSSN_Helper/src/RegisterSymmetries.c66
-rw-r--r--ML_BSSN_Helper/src/make.code.defn2
2 files changed, 1 insertions, 67 deletions
diff --git a/ML_BSSN_Helper/src/RegisterSymmetries.c b/ML_BSSN_Helper/src/RegisterSymmetries.c
deleted file mode 100644
index 6812079..0000000
--- a/ML_BSSN_Helper/src/RegisterSymmetries.c
+++ /dev/null
@@ -1,66 +0,0 @@
-#include <assert.h>
-
-#include <cctk.h>
-#include <cctk_Arguments.h>
-
-#include <Symmetry.h>
-
-static void
-setcartsym (cGH const * restrict cctkGH, char const * restrict vn, int symdesc);
-
-void
-ML_BSSN_RegisterSymmetry (CCTK_ARGUMENTS)
-{
- DECLARE_CCTK_ARGUMENTS;
-
- setcartsym (cctkGH, "ML_BSSN::phi" , 0);
- setcartsym (cctkGH, "ML_BSSN::gt11" , 11);
- setcartsym (cctkGH, "ML_BSSN::gt12" , 12);
- setcartsym (cctkGH, "ML_BSSN::gt13" , 13);
- setcartsym (cctkGH, "ML_BSSN::gt22" , 22);
- setcartsym (cctkGH, "ML_BSSN::gt23" , 23);
- setcartsym (cctkGH, "ML_BSSN::gt33" , 33);
- setcartsym (cctkGH, "ML_BSSN::trK" , 0);
- setcartsym (cctkGH, "ML_BSSN::At11" , 11);
- setcartsym (cctkGH, "ML_BSSN::At12" , 12);
- setcartsym (cctkGH, "ML_BSSN::At13" , 13);
- setcartsym (cctkGH, "ML_BSSN::At22" , 22);
- setcartsym (cctkGH, "ML_BSSN::At23" , 23);
- setcartsym (cctkGH, "ML_BSSN::At33" , 33);
- setcartsym (cctkGH, "ML_BSSN::Xt1" , 1);
- setcartsym (cctkGH, "ML_BSSN::Xt2" , 2);
- setcartsym (cctkGH, "ML_BSSN::Xt3" , 3);
- setcartsym (cctkGH, "ML_BSSN::alpha", 0);
- setcartsym (cctkGH, "ML_BSSN::beta1", 1);
- setcartsym (cctkGH, "ML_BSSN::beta2", 2);
- setcartsym (cctkGH, "ML_BSSN::beta3", 3);
- setcartsym (cctkGH, "ML_BSSN::A" , 0);
- setcartsym (cctkGH, "ML_BSSN::B1" , 1);
- setcartsym (cctkGH, "ML_BSSN::B2" , 2);
- setcartsym (cctkGH, "ML_BSSN::B3" , 3);
-}
-
-void
-setcartsym (cGH const * restrict const cctkGH,
- char const * restrict const vn,
- int symdesc)
-{
- int sym[3];
-
- for (int d=0; d<3; ++d) {
- sym[d] = +1;
- }
-
- assert (symdesc >= 0);
- while (symdesc > 0) {
- int const d = symdesc % 10;
- assert (d>=1 && d<=3);
- sym[d-1] *= -1;
- symdesc /= 10;
- }
-
- int const ierr = SetCartSymVN (cctkGH, sym, vn);
- if (ierr != 0) {
- CCTK_WARN (CCTK_WARN_ABORT, "internal error");
- }
-}
diff --git a/ML_BSSN_Helper/src/make.code.defn b/ML_BSSN_Helper/src/make.code.defn
index 60cb539..7e30e05 100644
--- a/ML_BSSN_Helper/src/make.code.defn
+++ b/ML_BSSN_Helper/src/make.code.defn
@@ -1,2 +1,2 @@
# -*-Makefile-*-
-SRCS = RegisterSlicing.c RegisterSymmetries.c SelectBCsADMBase.c UnsetCheckpointTags.c
+SRCS = RegisterSlicing.c SelectBCsADMBase.c UnsetCheckpointTags.c