thorn to comute the ADM mass

_very_ experimental at the moment


git-svn-id: http://svn.aei.mpg.de/numrel/AEIThorns/ADMMass/trunk@2 54511f98-0e4f-0410-826e-eb8b393f5a1e

1 files changed, 21 insertions, 0 deletions

diff --git a/src/loop.c b/src/loop.c
new file mode 100644
index 0000000..7cc36bb
--- /dev/null
+++ b/src/loop.c
@@ -0,0 +1,21 @@
+#include <cctk.h>
+#include <cctk_Arguments.h>
+#include <cctk_Parameters.h>
+
+/* Initialises the loop counter to the last radius/distance set */
+void ADMMass_InitLoopCounter(CCTK_ARGUMENTS)
+{
+    DECLARE_CCTK_ARGUMENTS
+    DECLARE_CCTK_PARAMETERS
+
+    *ADMMass_LoopCounter = ADMMass_number;
+}
+
+/* Decrements the counter to loop over all radii/distances set */
+void ADMMass_Loop(CCTK_ARGUMENTS)
+{
+    DECLARE_CCTK_ARGUMENTS
+    DECLARE_CCTK_PARAMETERS
+
+    (*ADMMass_LoopCounter)--;
+}