# Schedule definitions for thorn IDSWTEF
# $Header$

if (CCTK_EQUALS(initial_data, "charge-TATelliptic-Fortran")) {
  
  SCHEDULE IDSWTEF_uniform_charge AT initial
  {
    LANG: Fortran
    STORAGE: residuals
    STORAGE: level1 level2 level3
  } "Calculate uniform charge initial data, solved with TATelliptic in Fortran"

}