initial checkin of new LocalInterp thorn

git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/LocalInterp/trunk@2 df1f8a13-aa1d-4dd4-9681-27ded5b42416

1 files changed, 38 insertions, 0 deletions

diff --git a/src/GeneralizedPolynomial-Uniform/startup.c b/src/GeneralizedPolynomial-Uniform/startup.c
new file mode 100644
index 0000000..38453dd
--- /dev/null
+++ b/src/GeneralizedPolynomial-Uniform/startup.c
@@ -0,0 +1,38 @@
+ /*@@
+   @file      startup.c
+   @date      Thu Feb 21 16:25:35 CET 2002
+   @author    Jonathan Thornburg <jthorn@aei.mpg.de>
+   @desc
+              Startup routines for LocalInterp/GeneralizedPolynomial-Uniform
+   @enddesc
+   @version   $Id$
+ @@*/
+
+#include <stdlib.h>
+
+#include "cctk.h"
+#include "cctk_Interp.h"
+#include "InterpLocalUniform.h"
+
+/* the rcs ID and its dummy function to use it */
+static const char *rcsid = "$Header$";
+CCTK_FILEVERSION(CactusPUGH_LocalInterp_GeneralizedPolynomialUniform_startup_c)
+
+/* prototypes of routines defined in this source file */
+void LocalInterp_GPU_Startup(void);
+
+
+/*@@
+  @routine   LocalInterp_GPU_Startup
+  @date      Thu Feb 21 16:27:41 CET 2002
+  @author    Jonathan Thornburg <jthorn@aei.mpg.de>
+  @desc      This is the startup registration routine for
+             the generalized polynomial interpolator.
+  @enddesc
+  @@*/
+void LocalInterp_GPU_Startup(void)
+{
+CCTK_InterpRegisterOpLocalUniform(LocalInterp_InterpLocalUniform,
+                                  "generalized polynomial interpolation",
+				  CCTK_THORNSTRING);
+}