aboutsummaryrefslogtreecommitdiff
path: root/schedule.ccl
diff options
context:
space:
mode:
Diffstat (limited to 'schedule.ccl')
-rw-r--r--schedule.ccl17
1 files changed, 11 insertions, 6 deletions
diff --git a/schedule.ccl b/schedule.ccl
index 29ec81f..fa71107 100644
--- a/schedule.ccl
+++ b/schedule.ccl
@@ -1066,10 +1066,17 @@ if (CCTK_Equals(GRHydro_eos_type,"General"))
{
LANG: Fortran
} "Convert initial data given in primive variables to conserved variables - MHD version"
- }
- else if(CCTK_Equals(Bvec_evolution_method,"GRHydro_Avec"))
+ } else if(CCTK_Equals(Bvec_evolution_method,"GRHydro_Avec"))
{
- schedule Conservative2PrimitiveAM IN HydroBase_Con2Prim AS Con2Prim IF GRHydro::execute_MoL_PostStep
+ schedule GRHydro_BvecfromAvec IN HydroBase_Con2Prim
+ {
+ LANG: Fortran
+ } "Populate Bvec from Avec"
+# SCHEDULE group HydroBase_Boundaries AT CCTK_POSTINITIAL AFTER GRHydro_PoloidalMagFieldM AFTER GRHydro_BvecfromAvec
+ SCHEDULE group HydroBase_Boundaries IN HydroBase_Con2Prim AFTER GRHydro_BvecfromAvec
+ {
+ } "Call boundary conditions after magnetic field initial data setup"
+ schedule Conservative2PrimitiveAM IN HydroBase_Con2Prim AS Con2Prim AFTER HydroBase_Boundaries IF GRHydro::execute_MoL_PostStep
{
LANG: Fortran
} "Convert back to primitive variables (general) - MHD with Avec version"
@@ -1078,9 +1085,7 @@ if (CCTK_Equals(GRHydro_eos_type,"General"))
{
LANG: Fortran
} "Convert initial data given in primive variables to conserved variables - MHD with Avec version"
- }
- else
- {
+ } else {
schedule Conservative2Primitive IN HydroBase_Con2Prim AS Con2Prim IF GRHydro::execute_MoL_PostStep
{
LANG: Fortran