From faf063f95614bab77753164cb08cc754b1e5a25f Mon Sep 17 00:00:00 2001 From: Anton Khirnov Date: Sat, 20 Jun 2020 10:36:10 +0200 Subject: Register symmetries for grid functions. --- src/qms.c | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) (limited to 'src') diff --git a/src/qms.c b/src/qms.c index 63fbce1..047e4b6 100644 --- a/src/qms.c +++ b/src/qms.c @@ -1691,3 +1691,26 @@ void qms_mg_terminate_print_stats(CCTK_ARGUMENTS) context_free(&qms_context); } } + +void qms_mg_register_symmetries(CCTK_ARGUMENTS) +{ + DECLARE_CCTK_ARGUMENTS; + DECLARE_CCTK_PARAMETERS; + + int sym[3] = { 1, 1, 1 }; + int ret; + + ret = SetCartSymVN(cctkGH, sym, "QuasiMaximalSlicingMG::W_val"); + if (ret != 0) + CCTK_WARN(0, "Error registering symmetries"); +} + +void qms_mg_select_bc(CCTK_ARGUMENTS) +{ + DECLARE_CCTK_ARGUMENTS; + DECLARE_CCTK_PARAMETERS; + + int ret = Boundary_SelectVarForBC(cctkGH, CCTK_ALL_FACES, 1, -1, "QuasiMaximalSlicingMG::W_val", "none"); + if (ret != 0) + CCTK_WARN(0, "Error registering boundaries"); +} -- cgit v1.2.3