aboutsummaryrefslogtreecommitdiff
path: root/CarpetExtra/WaveToyExpl/schedule.ccl
diff options
context:
space:
mode:
authoreschnett <>2001-03-01 11:40:00 +0000
committereschnett <>2001-03-01 11:40:00 +0000
commit310f0ea48d18866b773136aed11200b6eda6378b (patch)
tree445d3e34ce8b89812994b6614f7bc9f4acbc7fe2 /CarpetExtra/WaveToyExpl/schedule.ccl
Initial revision
darcs-hash:20010301114010-f6438-12fb8a9ffcc80e86c0a97e37b5b0dae0dbc59b79.gz
Diffstat (limited to 'CarpetExtra/WaveToyExpl/schedule.ccl')
-rw-r--r--CarpetExtra/WaveToyExpl/schedule.ccl77
1 files changed, 77 insertions, 0 deletions
diff --git a/CarpetExtra/WaveToyExpl/schedule.ccl b/CarpetExtra/WaveToyExpl/schedule.ccl
new file mode 100644
index 000000000..8ef598e24
--- /dev/null
+++ b/CarpetExtra/WaveToyExpl/schedule.ccl
@@ -0,0 +1,77 @@
+# Schedule definitions for thorn WaveToyExpl
+# $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/WaveToyExpl/schedule.ccl,v 1.3 2003/11/05 16:18:40 schnetter Exp $
+
+STORAGE: scalarevolve[3]
+STORAGE: scalarevolveint[3]
+
+
+
+SCHEDULE WaveToyExpl_Startup AT startup
+{
+ LANG: Fortran
+} "Register banner"
+
+SCHEDULE WaveToyExpl_InitSymBound AT basegrid
+{
+ LANG: Fortran
+ OPTIONS: global
+} "Schedule symmetries"
+
+
+
+SCHEDULE WaveToyExpl_IntInit AT postinitial
+{
+ LANG: Fortran
+} "Initialise intermediate variables"
+
+
+
+SCHEDULE WaveToyExpl_IntStep AT evol
+{
+ LANG: Fortran
+} "Calculate intermediate step"
+
+SCHEDULE WaveToyExpl_IntBoundaries AT evol AFTER WaveToyExpl_IntStep
+{
+ LANG: Fortran
+ SYNC: scalarevolveint
+} "Select boundary conditions after intermediate step"
+
+SCHEDULE GROUP ApplyBCs AS WaveToyExpl_ApplyIntBoundaries AT evol AFTER WaveToyExpl_IntBoundaries
+{
+} "Apply boundary conditions after intermediate step"
+
+
+
+SCHEDULE WaveToyExpl_FinalStep AT evol AFTER WaveToyExpl_ApplyIntBoundaries
+{
+ LANG: Fortran
+} "Calculate final step"
+
+SCHEDULE WaveToyExpl_FinalBoundaries AT evol AFTER WaveToyExpl_FinalStep
+{
+ LANG: Fortran
+ SYNC: scalarevolve
+} "Select boundary conditions after final step"
+
+SCHEDULE GROUP ApplyBCs AS WaveToyExpl_ApplyFinalBoundaries AT evol AFTER WaveToyExpl_FinalBoundaries
+{
+} "Apply boundary conditions after final step"
+
+
+
+SCHEDULE WaveToyExpl_IntBoundaries AT POSTRESTRICT
+{
+ LANG: Fortran
+ SYNC: scalarevolveint
+} "Select boundary conditions after restricting"
+
+SCHEDULE WaveToyExpl_FinalBoundaries AT POSTRESTRICT
+{
+ LANG: Fortran
+ SYNC: scalarevolve
+} "Select boundary conditions after restricting"
+
+SCHEDULE GROUP ApplyBCs AS WaveToyExpl_ApplyBoundaries AT POSTRESTRICT AFTER (WaveToyMoL_IntBoundaries, WaveToyMoL_FinalBoundaries)
+{
+} "Apply boundary conditions after restricting"