diff options
author | eschnett <> | 2001-03-01 11:40:00 +0000 |
---|---|---|
committer | eschnett <> | 2001-03-01 11:40:00 +0000 |
commit | 310f0ea48d18866b773136aed11200b6eda6378b (patch) | |
tree | 445d3e34ce8b89812994b6614f7bc9f4acbc7fe2 /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.ccl | 77 |
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" |