diff options
Diffstat (limited to 'src/main/CactusDefaultMainLoopIndex.c')
-rw-r--r-- | src/main/CactusDefaultMainLoopIndex.c | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/src/main/CactusDefaultMainLoopIndex.c b/src/main/CactusDefaultMainLoopIndex.c new file mode 100644 index 00000000..5855d3ab --- /dev/null +++ b/src/main/CactusDefaultMainLoopIndex.c @@ -0,0 +1,55 @@ + /*@@ + @file CactusDefaultMainLoopIndex.c + @date Wed Oct 04 16:53:58 2000 + @author Gabrielle Allen + @desc + The default main loop index routines + @enddesc + @@*/ + +#include "cctk.h" + +static char *rcsid = "$Header$"; + +CCTK_FILEVERSION(main_CactusDefaultMainLoopIndex_c) + +static int iteration = 0; + + /*@@ + @routine CactusDefaultMainLoopIndex + @date Wed Oct 04 16:53:58 2000 + @author Gabrielle Allen + @desc + Default main loop index routine + @enddesc + @calls + @calledby + @history + + @endhistory + +@@*/ +int CactusDefaultMainLoopIndex(void) +{ + return (iteration); +} + + + /*@@ + @routine CactusDefaultSetMainLoopIndex + @date Sep 22 1999 + @author Thomas Radke + @desc + Sets the iteration counter variable of the evolution loop. + This is used for recovery. + @enddesc + @calls + @calledby + +@@*/ +int CactusDefaultSetMainLoopIndex (int main_loop_index) +{ + iteration = main_loop_index; + return iteration; +} + |