From d383e0e36f69f335494a789873d2572084f1c4a6 Mon Sep 17 00:00:00 2001 From: eschnett Date: Sat, 12 Nov 2011 02:59:03 +0000 Subject: Remove OldBoundary infrastructure Remove now-unused and currently broken OldBoundary infrastructure git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/MoL/trunk@153 578cdeb0-5ea1-4b81-8215-5a3b8777ee0b --- schedule.ccl | 37 ------------------------------------- src/OldBdry.c | 26 -------------------------- src/SetTime.c | 25 ------------------------- src/make.code.defn | 1 - 4 files changed, 89 deletions(-) delete mode 100644 src/OldBdry.c diff --git a/schedule.ccl b/schedule.ccl index f40cfcc..ff2eaf5 100644 --- a/schedule.ccl +++ b/schedule.ccl @@ -428,18 +428,6 @@ schedule MoL_SetTime IN MoL_StartStep OPTIONS: LEVEL } "Ensure the correct time and timestep are used" -##################################################### -### A truncated version of the above routine to ### -### ensure that all is correct for the OldBdry ### -### wrapper routines when run in POSTINITIAL. ### -##################################################### - -schedule MoL_SetInitialTime AT INITIAL -{ - LANG: C - OPTIONS: LEVEL -} "Ensure the correct time and timestep are used - initial" - ################################################################# ### PreStep is where physics thorns can do their own setup. ### ### This would include scheduling the function calls to ### @@ -712,31 +700,6 @@ schedule GROUP MoL_PseudoEvolutionBoundaries AT PostRestrict AFTER MoL_PostStep { } "Apply boundary conditions to pseudo-evolved quantities" -############################################################ -### Additional boundary condition bins as requested by ### -### Yosef Zlochower. ### -############################################################ - -schedule GROUP MoL_OldBdry_Wrap IN MoL_PostStep -{ -} "Wrapper group, do not schedule directly into this group" - -schedule GROUP MoL_OldStyleBoundaries in MoL_OldBdry_Wrap -{ -} "Place old style boundary routines here" - -schedule MoL_OldBdry_SetDt IN MoL_OldBdry_Wrap BEFORE MoL_OldStyleBoundaries -{ - LANGUAGE: C - OPTIONS: LEVEL -} "Store and change dt" - -schedule MoL_OldBdry_ResetDt IN MoL_OldBdry_Wrap AFTER MoL_OldStyleBoundaries -{ - LANGUAGE: C - OPTIONS: LEVEL -} "Reset dt" - ################################################# ### Final internal MoL stuff; decrement the ### ### counter, change time and timestep ### diff --git a/src/OldBdry.c b/src/OldBdry.c deleted file mode 100644 index f4b5751..0000000 --- a/src/OldBdry.c +++ /dev/null @@ -1,26 +0,0 @@ -#include "cctk.h" -#include "cctk_Arguments.h" - -static CCTK_REAL mol_dt; - - -void MoL_OldBdry_SetDt (CCTK_ARGUMENTS) -{ - DECLARE_CCTK_ARGUMENTS - - CCTK_REAL dt; - CCTK_REAL old_time; - - old_time = *Original_Time - *Original_Delta_Time / cctkGH->cctk_timefac; - - mol_dt = cctkGH->cctk_delta_time; - - dt = cctkGH->cctk_time - old_time; - - cctkGH->cctk_delta_time = dt * cctkGH->cctk_timefac; -} - -void MoL_OldBdry_ResetDt (CCTK_ARGUMENTS) -{ - cctkGH->cctk_delta_time = mol_dt; -} diff --git a/src/SetTime.c b/src/SetTime.c index 891bb19..c04cc0b 100644 --- a/src/SetTime.c +++ b/src/SetTime.c @@ -100,31 +100,6 @@ static const CCTK_REAL alpha_array65[8] = { ********************* External Routines ********************** ********************************************************************/ - /*@@ - @routine MoL_SetInitialTime - @date Mon Aug 14 09:33:45 2006 - @author Ian Hawke - @desc - Set the Original_Time and Original_Delta_Time variables correctly - (as the IndexArrays routine may be run too soon). - @enddesc - @calls - @calledby - @history - - @endhistory - -@@*/ - -void MoL_SetInitialTime(CCTK_ARGUMENTS) -{ - - DECLARE_CCTK_ARGUMENTS; - - *Original_Time = cctkGH->cctk_time; - *Original_Delta_Time = cctkGH->cctk_delta_time; -} - /*@@ @routine MoL_SetTime @date Mon May 20 09:48:55 2002 diff --git a/src/make.code.defn b/src/make.code.defn index b2717f9..926dbbb 100644 --- a/src/make.code.defn +++ b/src/make.code.defn @@ -8,7 +8,6 @@ SRCS = ChangeType.c \ ICN.c \ IndexArrays.c \ InitialCopy.c \ - OldBdry.c \ ParamCheck.c \ RK2.c \ RK3.c \ -- cgit v1.2.3