diff options
author | Erik Schnetter <schnetter@cct.lsu.edu> | 2008-08-04 11:52:07 -0500 |
---|---|---|
committer | Erik Schnetter <schnetter@cct.lsu.edu> | 2008-08-04 11:52:07 -0500 |
commit | ecf86b57b550bee257906fc7407f602fbf47d7e1 (patch) | |
tree | e52398aae88c12e743fcaf9db2ea3885afb099ea /ML_BSSN_Helper/src | |
parent | 823afa433a88cb83b9a8124391a1c26d4d1726bd (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.c | 66 | ||||
-rw-r--r-- | ML_BSSN_Helper/src/make.code.defn | 2 |
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 |