add missing interpatch_ghost_zone::assert_fully_setup()

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

1 files changed, 20 insertions, 0 deletions

diff --git a/src/patch/ghost_zone.cc b/src/patch/ghost_zone.cc
index 486ad57..bb3e99e 100644
--- a/src/patch/ghost_zone.cc
+++ b/src/patch/ghost_zone.cc
@@ -11,6 +11,7 @@
 // interpatch_ghost_zone::~interpatch_ghost_zone
 // interpatch_ghost_zone::[min,max]_ipar
 // interpatch_ghost_zone::setup_other_patch_frontier
+// interpatch_ghost_zone::assert_fully_setup
 // interpatch_ghost_zone::synchronize
 //
 
@@ -454,6 +455,25 @@ other_patch().set_patch_frontier(other_edge(), other_frontier_);
 //******************************************************************************
 
 //
+// This function asserts() that our frontier pointer is non-NULL,
+// that the other patch has an interpatch ghost zone on this edge, and
+// that that interpatch ghost zone points back to us.
+//
+void interpatch_ghost_zone::assert_fully_setup() const
+{
+assert(other_frontier_ != NULL);
+
+assert( other_patch()
+	.ghost_zone_on_edge(other_edge())
+	.is_interpatch() );
+assert( my_patch() == other_patch()
+		      .interpatch_ghost_zone_on_edge(other_edge())
+		      .other_patch() );
+}
+
+//******************************************************************************
+
+//
 // This function "synchronizes" a ghost zone, i.e. it updates the
 // ghost-zone values of the specified gridfns via the appropriate
 // interpatch interpolations.