From 84ef2c5a0836488eaaccdebbe755841a1f76a15a Mon Sep 17 00:00:00 2001 From: tradke Date: Sun, 26 Aug 2001 14:33:45 +0000 Subject: Explicitely allocate storage for CCTK variables of thorn Time. Closes CactusBase-768. git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Time/trunk@40 5633253d-7678-4964-a54d-f87795f8ee59 --- schedule.ccl | 21 +++++++++++---------- 1 file changed, 11 insertions(+), 10 deletions(-) diff --git a/schedule.ccl b/schedule.ccl index 419a3a2..65f8b4f 100644 --- a/schedule.ccl +++ b/schedule.ccl @@ -1,36 +1,37 @@ # Schedule definitions for thorn Time # $Header$ +STORAGE: speedvars, couranttemps + schedule Time_Initialise at CCTK_BASEGRID before (Time_Simple, Time_Given) { LANG: C } "Initialise Time variables" -if (CCTK_Equals(timestep_method,"courant_static")) +if (CCTK_Equals (timestep_method, "courant_static")) { schedule Time_Simple at CCTK_BASEGRID after SpatialCoordinates { - LANG: C + LANG: C } "Set timestep based on Courant condition" } -else if (CCTK_Equals(timestep_method,"courant_speed") || CCTK_Equals(timestep_method,"courant_time")) +else if (CCTK_Equals (timestep_method, "courant_speed") || + CCTK_Equals (timestep_method, "courant_time")) { schedule Time_Simple at CCTK_BASEGRID after SpatialCoordinates { - LANG: C + LANG: C } "Set timestep based on Courant condition" - schedule Time_Courant at CCTK_PRESTEP + schedule Time_Courant at CCTK_PRESTEP { LANG: C } "Reset timestep each iteration" } -else +else { schedule Time_Given at CCTK_BASEGRID { - LANG: C + LANG: C } "Set fixed timestep" -} - - +} -- cgit v1.2.3