summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--param.ccl6
-rw-r--r--schedule.ccl40
2 files changed, 27 insertions, 19 deletions
diff --git a/param.ccl b/param.ccl
index 1d208ed..0aac37a 100644
--- a/param.ccl
+++ b/param.ccl
@@ -1,5 +1,11 @@
# Parameter definitions for thorn QuasiMaximalSlicing
+shares: ML_BSSN
+EXTENDS CCTK_KEYWORD lapse_source "lapse_source"
+{
+ QMS :: ""
+}
+
RESTRICTED:
CCTK_INT basis_order_r "Number of the basis functions in the radial direction" STEERABLE=recover
{
diff --git a/schedule.ccl b/schedule.ccl
index 818d9a2..4f16e27 100644
--- a/schedule.ccl
+++ b/schedule.ccl
@@ -1,25 +1,27 @@
# Schedule definitions for thorn MaximalSlicingAxi
#
-SCHEDULE quasimaximal_slicing_axi_eval IN ML_BSSN_evolCalcGroup BEFORE ML_BSSN_lapse_evol {
- LANG: C
-} "Quasimaximal slicing eval W"
-SCHEDULE quasimaximal_slicing_axi_eval IN ML_CCZ4_evolCalcGroup BEFORE ML_CCZ4_lapse_evol {
- LANG: C
-} "Quasimaximal slicing eval W"
+if (CCTK_EQUALS(lapse_source, "QMS")) {
+ SCHEDULE quasimaximal_slicing_axi_eval IN ML_BSSN_evolCalcGroup BEFORE ML_BSSN_lapse_evol {
+ LANG: C
+ } "Quasimaximal slicing eval W"
+ SCHEDULE quasimaximal_slicing_axi_eval IN ML_CCZ4_evolCalcGroup BEFORE ML_CCZ4_lapse_evol {
+ LANG: C
+ } "Quasimaximal slicing eval W"
-#SCHEDULE quasimaximal_slicing_axi_solve IN ML_BSSN_evolCalcGroup BEFORE quasimaximal_slicing_axi_eval {
-#SCHEDULE quasimaximal_slicing_axi_solve IN MoL_PostStep AFTER ML_BSSN_ApplyBCs {
-SCHEDULE quasimaximal_slicing_axi_solve IN MoL_PreStep {
- LANG: C
-} "Quasimaximal slicing solve W"
+ #SCHEDULE quasimaximal_slicing_axi_solve IN ML_BSSN_evolCalcGroup BEFORE quasimaximal_slicing_axi_eval {
+ #SCHEDULE quasimaximal_slicing_axi_solve IN MoL_PostStep AFTER ML_BSSN_ApplyBCs {
+ SCHEDULE quasimaximal_slicing_axi_solve IN MoL_PreStep {
+ LANG: C
+ } "Quasimaximal slicing solve W"
-#SCHEDULE quasimaximal_slicing_axi IN MoL_PseudoEvolution {
-# LANG: C
-#} "Quasimaximal slicing"
+ #SCHEDULE quasimaximal_slicing_axi IN MoL_PseudoEvolution {
+ # LANG: C
+ #} "Quasimaximal slicing"
-SCHEDULE qms_init IN ADMBase_InitialData {
- LANG: C
-} ""
+ SCHEDULE qms_init IN ADMBase_InitialData {
+ LANG: C
+ } ""
-STORAGE: W_pred
-STORAGE: W_coeffs
+ STORAGE: W_pred
+ STORAGE: W_coeffs
+}