summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/make.code.defn2
-rw-r--r--src/qms.c7
-rw-r--r--src/register.c9
3 files changed, 7 insertions, 11 deletions
diff --git a/src/make.code.defn b/src/make.code.defn
index 2863409..5171428 100644
--- a/src/make.code.defn
+++ b/src/make.code.defn
@@ -1,7 +1,7 @@
# Main make.code.defn file for thorn MaximalSlicingAxi
# Source files in this directory
-SRCS = basis.c bicgstab.c qms.c qms_solve.c pssolve.c register.c
+SRCS = basis.c bicgstab.c qms.c qms_solve.c pssolve.c
# Subdirectories containing source files
SUBDIRS =
diff --git a/src/qms.c b/src/qms.c
index 54cd657..839f16d 100644
--- a/src/qms.c
+++ b/src/qms.c
@@ -353,7 +353,7 @@ void quasimaximal_slicing_axi_eval(CCTK_ARGUMENTS)
int64_t expand_start;
- double *coeffs = NULL;
+ double *coeffs = NULL, *W;
int i, ret;
if (!qms_context)
@@ -393,6 +393,11 @@ void quasimaximal_slicing_axi_eval(CCTK_ARGUMENTS)
}
#endif
+ if (ccz4)
+ W = CCTK_VarDataPtr(cctkGH, 0, "ML_CCZ4::W");
+ else
+ W = CCTK_VarDataPtr(cctkGH, 0, "ML_BSSN::W");
+
CCTK_TimerStart("QuasiMaximalSlicing_Expand");
expand_start = gettime();
#if 0
diff --git a/src/register.c b/src/register.c
deleted file mode 100644
index 65c2d21..0000000
--- a/src/register.c
+++ /dev/null
@@ -1,9 +0,0 @@
-
-#include "cctk.h"
-#include "cctk_Arguments.h"
-#include "Slicing.h"
-
-void qms_register_mol(CCTK_ARGUMENTS)
-{
- MoLRegisterConstrained(CCTK_VarIndex("QuasiMaximalSlicing::W"));
-}