diff options
Diffstat (limited to 'schedule.ccl')
-rw-r--r-- | schedule.ccl | 43 |
1 files changed, 34 insertions, 9 deletions
diff --git a/schedule.ccl b/schedule.ccl index abd1eb2..53ac01c 100644 --- a/schedule.ccl +++ b/schedule.ccl @@ -3,12 +3,37 @@ STORAGE: metric_prev metric_prev2 metric_next -SCHEDULE CalcK AT postinitial -{ - LANG: Fortran - SYNC: ADMBase::curv -} "Calculate K_ij from gamma_ij, alpha, and beta^i" - -SCHEDULE GROUP ApplyBCs as CalcK_ApplyBCs AT postinitial AFTER CalcK -{ -} "Apply boundary conditions" +if (copy_to_prev) { + SCHEDULE CalcK_copy_to_prev AT postinitial + { + LANG: Fortran + } "Copy ADMBase::metric to CalcK::metric_prev" +} + +if (copy_to_prev2) { + SCHEDULE CalcK_copy_to_prev2 AT postinitial + { + LANG: Fortran + } "Copy ADMBase::metric to CalcK::metric_prev2" +} + +if (copy_to_next) { + SCHEDULE CalcK_copy_to_next AT postinitial + { + LANG: Fortran + } "Copy ADMBase::metric to CalcK::metric_next" +} + +if (calc_extcurv) { + + SCHEDULE CalcK AT postinitial + { + LANG: Fortran + SYNC: ADMBase::curv + } "Calculate K_ij from gamma_ij, alpha, and beta^i" + + SCHEDULE GROUP ApplyBCs as CalcK_ApplyBCs AT postinitial AFTER CalcK + { + } "Apply boundary conditions" + +} |