diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/SetTime.c | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/src/SetTime.c b/src/SetTime.c index 5149eb2..5866d0d 100644 --- a/src/SetTime.c +++ b/src/SetTime.c @@ -101,6 +101,33 @@ static const CCTK_REAL alpha_array65[8] = { ********************************************************************/ /*@@ + @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 + +@@*/ + +int MoL_SetInitialTime(CCTK_ARGUMENTS) +{ + + DECLARE_CCTK_ARGUMENTS; + + *Original_Time = cctkGH->cctk_time; + *Original_Delta_Time = cctkGH->cctk_delta_time; + + return 0; +} + + /*@@ @routine MoL_SetTime @date Mon May 20 09:48:55 2002 @author Ian Hawke |