From 7f8bdd51e07ac3e7bdd3b3f229c482d0e9efdfd6 Mon Sep 17 00:00:00 2001 From: goodale Date: Wed, 19 Apr 2000 07:58:31 +0000 Subject: Removed explicit calls to sync and boundaries. Now the syncing is done via the schedular. Tom git-svn-id: http://svn.cactuscode.org/arrangements/CactusWave/WaveToyF77/trunk@51 4451c3c6-1034-4891-99ea-21147727ccdf --- schedule.ccl | 5 +++++ 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 -- cgit v1.2.3