add a new aliased function

  HorizonCentroid()
so other thorns can query the horizon centroid


git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinderDirect/trunk@1469 f88db872-0e4f-0410-b76b-b9085cfa78c5

1 files changed, 18 insertions, 0 deletions

diff --git a/interface.ccl b/interface.ccl
index 707a8de..798f96b 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -59,6 +59,21 @@ CCTK_INT FUNCTION HorizonLocalCoordinateOrigin				\
 CCTK_INT FUNCTION HorizonWasFound(CCTK_INT IN horizon_number)
 
 #
+# The following function queries whether or not the specified horizon
+# was found the most recent time AHFinderDirect searched for it, and
+# if it was, returns the horizon centroid.  The returned value is the
+# same as that of  HorizonWasFound()  (above), i.e.
+#  1 if the horizon was found; in this case  centroid_[xyz]  are set
+#    to the centroid position
+#  0 if the horizon was not found; in this case  centroid_[xyz]  are
+#    set to zeros
+#  negative for an error
+#
+CCTK_INT FUNCTION HorizonCentroid					\
+  (CCTK_INT IN horizon_number,						\
+   CCTK_REAL OUT centroid_x, CCTK_REAL OUT centroid_y, CCTK_REAL OUT centroid_z)
+
+#
 # The following function computes the horizon radius in the direction
 # of each (x,y,z) point, or -1.0 if this horizon wasn't found the most
 # recent time AHFinderDirect searched for it.  More precisely, for each
@@ -88,6 +103,9 @@ PROVIDES FUNCTION HorizonLocalCoordinateOrigin				\
 PROVIDES FUNCTION HorizonWasFound					\
 	WITH AHFinderDirect_horizon_was_found				\
 	LANGUAGE C
+PROVIDES FUNCTION HorizonCentroid					\
+	WITH AHFinderDirect_horizon_centroid				\
+	LANGUAGE C
 PROVIDES FUNCTION HorizonRadiusInDirection				\
 	WITH AHFinderDirect_radius_in_direction				\
 	LANGUAGE C