# Schedule definitions for thorn BenchADM
# $Header$


schedule Bench_ParamCheck at CCTK_PARAMCHECK
{
  LANG: C
} "Check parameters"

if (CCTK_Equals(evolution_method,"ADM"))
{
  STORAGE: ADM_metric_prev[2]
  STORAGE: ADM_curv_stag[3]

  schedule Bench_PreLoop at CCTK_INITIAL after InitialEinstein
  {
    LANG: Fortran
  }"Setup for ADM"


  if (time_symmetric)
  {
    schedule Bench_StaggeredLeapfrog1a_TS at CCTK_POSTINITIAL 
    {
       LANG: Fortran
    } "Time symmetric initial data for staggered leapfrog"
  }
  else
  {
    schedule Bench_StaggeredLeapfrog1a at CCTK_POSTINITIAL 
    {
       STORAGE: ADM_sources
       LANG: Fortran
    } "Time asymmetric initial data for staggered leapfrog"
  }
  schedule Bench_StaggeredLeapfrog2 at CCTK_EVOL
  {
    SYNC: ADM_curv_stag
    LANG: Fortran
  } "Evolve using Staggered Leapfrog"
}