1 files changed, 89 insertions, 0 deletions
diff --git a/Carpet/Carpet/interface.ccl b/Carpet/Carpet/interface.ccl
new file mode 100644
index 000000000..1e59767be
--- /dev/null
+++ b/Carpet/Carpet/interface.ccl
@@ -0,0 +1,89 @@
+# Interface definition for thorn Carpet
+# $Header: /home/eschnett/C/carpet/Carpet/Carpet/Carpet/interface.ccl,v 1.18 2004/06/08 21:09:25 schnetter Exp $
+
+IMPLEMENTS: Driver
+
+include header: carpet_public.hh in carpet.hh
+include header: carpet_public.h in carpet.h
+
+uses include header: defs.hh
+uses include header: dist.hh
+
+uses include header: bbox.hh
+uses include header: bboxset.hh
+uses include header: vect.hh
+
+uses include header: data.hh
+uses include header: dh.hh
+uses include header: gf.hh
+uses include header: ggf.hh
+uses include header: gh.hh
+uses include header: th.hh
+
+uses include header: operators.hh
+
+
+
+# Provide the function to en-/disable prolongation
+CCTK_INT FUNCTION EnableProlongating(CCTK_INT IN flag)
+PROVIDES FUNCTION EnableProlongating WITH CarpetEnableProlongating LANGUAGE C
+
+
+
+# The location of the boundary points
+CCTK_INT FUNCTION GetBoundarySpecification \
+  (CCTK_INT IN size, \
+   CCTK_INT OUT ARRAY nboundaryzones, \
+   CCTK_INT OUT ARRAY is_internal, \
+   CCTK_INT OUT ARRAY is_staggered, \
+   CCTK_INT OUT ARRAY shiftout)
+USES FUNCTION GetBoundarySpecification
+
+# The overall size of the domain
+CCTK_INT FUNCTION GetDomainSpecification \
+  (CCTK_INT IN size, \
+   CCTK_REAL OUT ARRAY physical_min, \
+   CCTK_REAL OUT ARRAY physical_max, \
+   CCTK_REAL OUT ARRAY interior_min, \
+   CCTK_REAL OUT ARRAY interior_max, \
+   CCTK_REAL OUT ARRAY exterior_min, \
+   CCTK_REAL OUT ARRAY exterior_max, \
+   CCTK_REAL OUT ARRAY spacing)
+USES FUNCTION GetDomainSpecification
+
+# Conversion between boundary types
+CCTK_INT FUNCTION ConvertFromPhysicalBoundary \
+  (CCTK_INT IN size, \
+   CCTK_REAL IN  ARRAY physical_min, \
+   CCTK_REAL IN  ARRAY physical_max, \
+   CCTK_REAL OUT ARRAY interior_min, \
+   CCTK_REAL OUT ARRAY interior_max, \
+   CCTK_REAL OUT ARRAY exterior_min, \
+   CCTK_REAL OUT ARRAY exterior_max, \
+   CCTK_REAL IN  ARRAY spacing)
+USES FUNCTION ConvertFromPhysicalBoundary
+
+CCTK_INT FUNCTION ConvertFromExteriorBoundary \
+  (CCTK_INT IN size, \
+   CCTK_REAL OUT ARRAY physical_min, \
+   CCTK_REAL OUT ARRAY physical_max, \
+   CCTK_REAL OUT ARRAY interior_min, \
+   CCTK_REAL OUT ARRAY interior_max, \
+   CCTK_REAL IN  ARRAY exterior_min, \
+   CCTK_REAL IN  ARRAY exterior_max, \
+   CCTK_REAL IN  ARRAY spacing)
+USES FUNCTION ConvertFromExteriorBoundary
+
+
+
+# The true prototype of the routine below:
+#   int Carpet_Regrid (const cGH * cctkGH,
+#                      gh<dim>::rexts  * bbsss,
+#                      gh<dim>::rbnds  * obss,
+#                      gh<dim>::rprocs * pss);
+CCTK_INT FUNCTION Carpet_Regrid (CCTK_POINTER_TO_CONST IN cctkGH,  \
+                                 CCTK_POINTER IN bbsss,            \
+                                 CCTK_POINTER IN obss,             \
+                                 CCTK_POINTER IN pss,		   \
+				 CCTK_INT IN force)
+USES FUNCTION Carpet_Regrid