From 25089fd64422546f407ec9249a0b7af3df29fb1a Mon Sep 17 00:00:00 2001
From: reisswig <reisswig@a2659f00-0f4f-0410-9214-a4596bbb8a4f>
Date: Sun, 5 Oct 2008 03:13:55 +0000
Subject: Forgot to add new file.

git-svn-id: http://svn.aei.mpg.de/numrel/AEIThorns/PunctureTracker/trunk@13 a2659f00-0f4f-0410-9214-a4596bbb8a4f
---
 src/paramcheck.cc | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 src/paramcheck.cc

diff --git a/src/paramcheck.cc b/src/paramcheck.cc
new file mode 100644
index 0000000..c3d65ca
--- /dev/null
+++ b/src/paramcheck.cc
@@ -0,0 +1,25 @@
+#include "cctk.h"
+#include "cctk_Parameters.h"
+#include "cctk_Arguments.h"
+#include "cctk_Functions.h"
+
+
+
+extern "C" void PunctureTracker_ParamCheck(CCTK_ARGUMENTS)
+{
+   DECLARE_CCTK_ARGUMENTS
+   DECLARE_CCTK_PARAMETERS
+   
+   // do this only on processor 0
+   if (CCTK_MyProc(cctkGH) != 0)
+      return;
+
+   for (int i=0; i < 10; ++i)
+   {
+     if (which_surface_to_store_info[i] != -1)
+     {
+       if (which_surface_to_store_info[i] >= nsurfaces)
+         CCTK_PARAMWARN("You assigned a greater surface index than there are spherical surfaces!");
+     }
+   }
+}
-- 
cgit v1.2.3