diff options
Diffstat (limited to 'ML_CCZ4/src/RegisterMoL.cc')
-rw-r--r-- | ML_CCZ4/src/RegisterMoL.cc | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/ML_CCZ4/src/RegisterMoL.cc b/ML_CCZ4/src/RegisterMoL.cc index a22a9d0..6db8bb8 100644 --- a/ML_CCZ4/src/RegisterMoL.cc +++ b/ML_CCZ4/src/RegisterMoL.cc @@ -18,14 +18,12 @@ extern "C" void ML_CCZ4_RegisterVars(CCTK_ARGUMENTS) ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::At22"), CCTK_VarIndex("ML_CCZ4::At22rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::At23"), CCTK_VarIndex("ML_CCZ4::At23rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::At33"), CCTK_VarIndex("ML_CCZ4::At33rhs")); - ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::A"), CCTK_VarIndex("ML_CCZ4::Arhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::B1"), CCTK_VarIndex("ML_CCZ4::B1rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::B2"), CCTK_VarIndex("ML_CCZ4::B2rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::B3"), CCTK_VarIndex("ML_CCZ4::B3rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::Xt1"), CCTK_VarIndex("ML_CCZ4::Xt1rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::Xt2"), CCTK_VarIndex("ML_CCZ4::Xt2rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::Xt3"), CCTK_VarIndex("ML_CCZ4::Xt3rhs")); - ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::alpha"), CCTK_VarIndex("ML_CCZ4::alpharhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::phi"), CCTK_VarIndex("ML_CCZ4::phirhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::gt11"), CCTK_VarIndex("ML_CCZ4::gt11rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::gt12"), CCTK_VarIndex("ML_CCZ4::gt12rhs")); @@ -38,6 +36,11 @@ extern "C" void ML_CCZ4_RegisterVars(CCTK_ARGUMENTS) ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::beta3"), CCTK_VarIndex("ML_CCZ4::beta3rhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::Theta"), CCTK_VarIndex("ML_CCZ4::Thetarhs")); ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::trK"), CCTK_VarIndex("ML_CCZ4::trKrhs")); + + if (CCTK_EQUALS(lapse_evolution_method, "ML_CCZ4")) + ierr += MoLRegisterEvolved(CCTK_VarIndex("ML_CCZ4::alpha"), CCTK_VarIndex("ML_CCZ4::alpharhs")); + else + ierr += MoLRegisterConstrained(CCTK_VarIndex("ML_CCZ4::alpha")); /* Register all the evolved Array functions with MoL */ return; |