From 7237cdcea55b9f78df621a257afdc3fb2e20ab0b Mon Sep 17 00:00:00 2001
From: allen <allen@fa3da13c-9f13-4301-a575-cf5b8c5e1907>
Date: Tue, 21 May 2002 16:37:47 +0000
Subject: Tidying warning statements and adding debug info
 (elliptic_verbose="debug")

git-svn-id: http://svn.cactuscode.org/arrangements/CactusElliptic/EllSOR/trunk@82 fa3da13c-9f13-4301-a575-cf5b8c5e1907
---
 src/ConfMetric.c | 20 +++++++++++++++++---
 1 file changed, 17 insertions(+), 3 deletions(-)

diff --git a/src/ConfMetric.c b/src/ConfMetric.c
index 6510895..31dbe27 100644
--- a/src/ConfMetric.c
+++ b/src/ConfMetric.c
@@ -152,9 +152,19 @@ int SORConfMetric3D(cGH *GH, int *MetricPsiI, int conformal,
   /* If Robin BCs are set, prepare for a boundary call:
      setup stencil width and get Robin constants (set by the routine
      which is calling the solver interface) */
-  if (Ell_GetStrKey(&robin, "EllLinConfMetric::Bnd::Robin")< 0)
+  if (conformal)
+  {
+    if (Ell_GetStrKey(&robin, "EllLinConfMetric::Bnd::Robin")< 0)
+    {
+      CCTK_WARN(1,"SORConfMetric3D: Robin keys not set for LinConfMetric solver");
+    }
+  }
+  else
   {
-    CCTK_WARN(1,"SORConfMetric3D: Robin keys not set");
+    if (Ell_GetStrKey(&robin, "EllLinMetric::Bnd::Robin")< 0)
+    {
+      CCTK_WARN(1,"SORConfMetric3D: Robin keys not set for LinMetric solver");
+    }
   }
   
   if (CCTK_EQUALS(robin,"yes")) 
@@ -533,9 +543,13 @@ int SORConfMetric3D(cGH *GH, int *MetricPsiI, int conformal,
       }
     }
 
+    if (CCTK_Equals(elliptic_verbose,"debug"))
+    {
+      CCTK_VInfo(CCTK_THORNSTRING,"  .. residual at %f",glob_residual);
+    }
   }
 
-  if (elliptic_verbose)
+  if (CCTK_Equals(elliptic_verbose,"yes"))
   {
     CCTK_VInfo(CCTK_THORNSTRING,"Required SOR tolerence was set at %f",tol);
     CCTK_VInfo(CCTK_THORNSTRING,"Achieved SOR residual was %f",glob_residual);
-- 
cgit v1.2.3