From e93ba7bbf376b2ac42eca2d298e5bf08d9abf902 Mon Sep 17 00:00:00 2001 From: schnetter <> Date: Sun, 26 Aug 2001 11:58:00 +0000 Subject: 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 --- CarpetExtra/HydroToy/param.ccl | 8 +++++++- CarpetExtra/HydroToy/schedule.ccl | 13 ++++++++++--- 2 files changed, 17 insertions(+), 4 deletions(-) (limited to 'CarpetExtra/HydroToy') 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" + + + +} -- cgit v1.2.3