diff options
author | goodale <goodale@4451c3c6-1034-4891-99ea-21147727ccdf> | 2000-04-19 07:58:31 +0000 |
---|---|---|
committer | goodale <goodale@4451c3c6-1034-4891-99ea-21147727ccdf> | 2000-04-19 07:58:31 +0000 |
commit | 7f8bdd51e07ac3e7bdd3b3f229c482d0e9efdfd6 (patch) | |
tree | 09ca0aa96429d54335b29ca0934efb25b7b1be72 | |
parent | 168a3c0a7f89b9ec54504e47c18dd0ca7bcb6940 (diff) |
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
-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 |