diff options
author | schnetter <> | 2001-08-26 11:58:00 +0000 |
---|---|---|
committer | schnetter <> | 2001-08-26 11:58:00 +0000 |
commit | e93ba7bbf376b2ac42eca2d298e5bf08d9abf902 (patch) | |
tree | af318f4aaafee2dda9a0565c886b6ae4a0470d7e /CarpetExtra/HydroToy | |
parent | c93aafce1700484798d804c0e17834c79aae97fa (diff) |
1. Added interface for AMR. Carpet still contains no clusterer, but
1. Added interface for AMR. Carpet still contains no clusterer, but
the application can now determine where to refine.
2. Made scalars (again) available all the time. This allows the
scheduler to use scalars.
darcs-hash:20010826115851-07bb3-eca06f09fe49430522d9770bdf5ff2e99f7578a6.gz
Diffstat (limited to 'CarpetExtra/HydroToy')
-rw-r--r-- | CarpetExtra/HydroToy/param.ccl | 8 | ||||
-rw-r--r-- | CarpetExtra/HydroToy/schedule.ccl | 13 |
2 files changed, 17 insertions, 4 deletions
diff --git a/CarpetExtra/HydroToy/param.ccl b/CarpetExtra/HydroToy/param.ccl index 2760c29dd..d27dbef12 100644 --- a/CarpetExtra/HydroToy/param.ccl +++ b/CarpetExtra/HydroToy/param.ccl @@ -1,5 +1,11 @@ # Parameter definitions for thorn HydroToy -# $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/param.ccl,v 1.2 2001/03/21 22:57:40 eschnett Exp $ +# $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/param.ccl,v 1.3 2001/08/26 13:59:38 schnetter Exp $ + +restricted: + +BOOLEAN hydrotoy_active "Activate or deactivate the HydroToy thorn" +{ +} "yes" private: diff --git a/CarpetExtra/HydroToy/schedule.ccl b/CarpetExtra/HydroToy/schedule.ccl index 319793a1d..aa8716cb0 100644 --- a/CarpetExtra/HydroToy/schedule.ccl +++ b/CarpetExtra/HydroToy/schedule.ccl @@ -1,5 +1,9 @@ # Schedule definitions for thorn HydroToy -# $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/schedule.ccl,v 1.1 2001/03/18 22:37:09 eschnett Exp $ +# $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/HydroToy/schedule.ccl,v 1.2 2001/08/26 13:59:40 schnetter Exp $ + +if (hydrotoy_active) { + + STORAGE: hydroevolve @@ -29,10 +33,13 @@ schedule HydroToy_EulerPredictor at EVOL SYNC: hydroevolve } "Euler predictor step" -schedule HydroToy_EulerCorrector at EVOL \ - after HydroToy_EulerPredictor +schedule HydroToy_EulerCorrector at EVOL after HydroToy_EulerPredictor { LANG: Fortran STORAGE: hydrotemps SYNC: hydroevolve } "Euler corrector step" + + + +} |