diff options
author | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2003-02-16 22:21:49 +0000 |
---|---|---|
committer | jthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5> | 2003-02-16 22:21:49 +0000 |
commit | cc221a875a640142697df54a2bcff6638f7b1a88 (patch) | |
tree | a1477d8a3dd8b96d0dea7a2af4546556166389aa /src/elliptic | |
parent | 04ed769ddfacb1d6f5faedb66d3ff8d512ede7d4 (diff) |
* general tidying of multiprocessor code
* add current iteration number to what's sent to processor #0 for
printing at each iteration
* add a new verbosity level "algorithm debug" for what used to be
#ifdef DEBUG debugging code
* add new parameters & logic to set CCTK_Warn() levels for various
warnings (eg AH is outside the gid, metric isn't +ve definite, etc)
* restore the ability to output the horizon shape to a data file,
which I mistakenly deleted a few days ago :(
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinderDirect/trunk@947 f88db872-0e4f-0410-b76b-b9085cfa78c5
Diffstat (limited to 'src/elliptic')
-rw-r--r-- | src/elliptic/dense_Jacobian.cc | 2 | ||||
-rw-r--r-- | src/elliptic/row_sparse_Jacobian.cc | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/src/elliptic/dense_Jacobian.cc b/src/elliptic/dense_Jacobian.cc index 1dd6fbb..3e4e582 100644 --- a/src/elliptic/dense_Jacobian.cc +++ b/src/elliptic/dense_Jacobian.cc @@ -133,7 +133,7 @@ dense_Jacobian::dense_Jacobian(patch_system& ps, { if (print_msg_flag) then CCTK_VInfo(CCTK_THORNSTRING, - " dense Jacobian matrix (N_rows_=%d)", + " dense Jacobian matrix (%d rows)", N_rows_); } #endif // HAVE_DENSE_JACOBIAN diff --git a/src/elliptic/row_sparse_Jacobian.cc b/src/elliptic/row_sparse_Jacobian.cc index 875ab7d..4927000 100644 --- a/src/elliptic/row_sparse_Jacobian.cc +++ b/src/elliptic/row_sparse_Jacobian.cc @@ -146,7 +146,7 @@ row_sparse_Jacobian::row_sparse_Jacobian(patch_system& ps, { if (print_msg_flag) then CCTK_VInfo(CCTK_THORNSTRING, - " row sparse matrix Jacobian (N_rows_=%d)", + " row sparse matrix Jacobian (%d rows)", N_rows_); zero_matrix(); @@ -459,7 +459,7 @@ integer istatus, ierror; #endif if (ierror != 0) - then CCTK_VWarn(-1, __LINE__, __FILE__, CCTK_THORNSTRING, + then CCTK_VWarn(FATAL_ERROR, __LINE__, __FILE__, CCTK_THORNSTRING, "***** row_sparse_Jacobian__ILUCG::solve_linear_system(rhs_gfn=%d, x_gfn=%d):\n" " error return istatus=%d from [sd]ilucg() routine!" , |