# Schedule definitions for thorn IDScalarWave
# $Header$


if (CCTK_Equals(binary_source,"yes")||CCTK_Equals(binary_source,"fast"))
{ 
  schedule WaveBinary at EVOL after WaveToyF77_Evolution
  {  
    STORAGE: wavetoy::scalarevolve
    LANG:    Fortran
  } "Provide binary source during evolution"
}

if (CCTK_Equals(binary_source,"slow"))
{ 
  schedule WaveBinarySlow at EVOL after WaveToyF77_Evolution
  {  
    STORAGE: wavetoy::scalarevolve
    LANG:    Fortran
  } "Provide binary source during evolution"
}


schedule IDScalarWave_CheckParameters at CCTK_PARAMCHECK
{
  LANG: Fortran
} "Check parameters"

schedule IDScalarWave_InitialData at CCTK_INITIAL
{
  STORAGE:       wavetoy::scalarevolve
  LANG:          Fortran
} "Initial data for 3D wave equation"