diff options
| -rw-r--r-- | schedule.ccl | 5 | ||||
| -rw-r--r-- | src/WaveToy.F77 | 8 |
2 files changed, 5 insertions, 8 deletions
diff --git a/schedule.ccl b/schedule.ccl index 998985a..1f2e7c0 100644 --- a/schedule.ccl +++ b/schedule.ccl @@ -16,6 +16,11 @@ schedule WaveToyF77_InitSymBound at BASEGRID schedule WaveToyF77_Evolution as WaveToy_Evolution at EVOL { LANG: Fortran + SYNC: scalarevolve } "Evolution of 3D wave equation" +schedule WaveToyF77_Boundaries as WaveToy_Boundaries at EVOL AFTER WaveToy_Evolution +{ + LANG: Fortran +} "Boundaries of 3D wave equation" diff --git a/src/WaveToy.F77 b/src/WaveToy.F77 index 98d21be..4a363a5 100644 --- a/src/WaveToy.F77 +++ b/src/WaveToy.F77 @@ -89,14 +89,6 @@ c ---------------- end do end do -c Synchronize -c ----------- - call CCTK_SyncGroup(cctkGH,"wavetoy::scalarevolve") - -c Apply boundary conditions -c ------------------------- - call WaveToyF77_Boundaries(CCTK_PASS_FTOF) - return end |