From cefdd66d6e41455dd457d284893d20f1b9662894 Mon Sep 17 00:00:00 2001
From: jthorn <jthorn@6a3ddf76-46e1-4315-99d9-bc56cac1ef84>
Date: Tue, 6 May 2003 12:18:47 +0000
Subject: add CCTK_VInfo() calls to tell the user that we're in this thorn
 setting up initial data

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/IDAnalyticBH/trunk@131 6a3ddf76-46e1-4315-99d9-bc56cac1ef84
---
 src/BrillLindquist.c  | 4 ++++
 src/Kerr.c            | 8 +++-----
 src/Misner_multiple.c | 3 +++
 src/Misner_standard.c | 2 ++
 src/Schwarzschild.c   | 2 ++
 5 files changed, 14 insertions(+), 5 deletions(-)

diff --git a/src/BrillLindquist.c b/src/BrillLindquist.c
index cdf59b1..4e2454b 100644
--- a/src/BrillLindquist.c
+++ b/src/BrillLindquist.c
@@ -48,6 +48,10 @@ void BrillLindquist(CCTK_ARGUMENTS)
   int i, npoints;
   int make_conformal_derivs;
 
+  CCTK_VInfo(CCTK_THORNSTRING,
+             "setting up Brill-Lindquist initial data for %d black holes",
+             (int)bl_nbh);
+
   /* Check if we should create and store conformal factor stuff */
   if(CCTK_EQUALS(metric_type, "static conformal"))
   {
diff --git a/src/Kerr.c b/src/Kerr.c
index 22f1ea7..8e8c4ad 100644
--- a/src/Kerr.c
+++ b/src/Kerr.c
@@ -60,6 +60,9 @@ void KerrID(CCTK_ARGUMENTS)
   CCTK_REAL m=mass,a=a_Kerr,a_2=a*a,m2_a2=m*m-a_2;
   int make_conformal_derivs;
 
+  CCTK_VInfo(CCTK_THORNSTRING,
+             "setting up Kerr initial data");
+
   /* total number of points on this processor */
   npoints = cctk_lsh[0] * cctk_lsh[1] * cctk_lsh[2];
 
@@ -322,8 +325,3 @@ void KerrID(CCTK_ARGUMENTS)
   
   return;
 }
-
-
-
-
-
diff --git a/src/Misner_multiple.c b/src/Misner_multiple.c
index db0ec68..3c084c2 100644
--- a/src/Misner_multiple.c
+++ b/src/Misner_multiple.c
@@ -48,6 +48,9 @@ void Misner_multiple(CCTK_ARGUMENTS)
   const CCTK_REAL inv_nm_eps_squared = 1.0 / SQR(nm_eps);
   int make_conformal_derivs;
 
+  CCTK_VInfo(CCTK_THORNSTRING,
+             "setting up Misner initial data for %d black holes",
+             (int)misner_nbh);
 
   /* Check if we should create and store conformal factor stuff */
   if(CCTK_EQUALS(metric_type, "static conformal"))
diff --git a/src/Misner_standard.c b/src/Misner_standard.c
index 0419ccc..ec829b4 100644
--- a/src/Misner_standard.c
+++ b/src/Misner_standard.c
@@ -77,6 +77,8 @@ void Misner_standard(CCTK_ARGUMENTS)
   const CCTK_REAL zero = 0.0, one = 1.0, three = 3.0;
   int make_conformal_derivs;
 
+  CCTK_VInfo(CCTK_THORNSTRING,
+             "setting up Misner initial data");
 
   /* Check if we should create and store conformal factor stuff */
   if(CCTK_EQUALS(metric_type, "static conformal"))
diff --git a/src/Schwarzschild.c b/src/Schwarzschild.c
index c1cab71..f2b390f 100644
--- a/src/Schwarzschild.c
+++ b/src/Schwarzschild.c
@@ -30,6 +30,8 @@ void Schwarzschild(CCTK_ARGUMENTS)
   int make_conformal_derivs;
   int i, npoints;
 
+  CCTK_VInfo(CCTK_THORNSTRING,
+             "setting up Schwarzschild initial");
 
   /* Check if we should create and store conformal factor stuff */
   if(CCTK_EQUALS(metric_type, "static conformal"))
-- 
cgit v1.2.3