From 02ce95de8c0988b256ea61a0d2302841ac5f7f0d Mon Sep 17 00:00:00 2001
From: Knut Morten Okstad <knut.morten.okstad@sintef.no>
Date: Fri, 31 Mar 2017 07:19:23 +0200
Subject: [PATCH] Added: Error message when dynamics solver diverges

---
 src/SIM/NewmarkSIM.C | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/SIM/NewmarkSIM.C b/src/SIM/NewmarkSIM.C
index e37b4235..792fcb82 100644
--- a/src/SIM/NewmarkSIM.C
+++ b/src/SIM/NewmarkSIM.C
@@ -357,6 +357,8 @@ SIM::ConvStatus NewmarkSIM::solveStep (TimeStep& param, SIM::SolutionMode,
         return SIM::CONVERGED;
 
       case SIM::DIVERGED:
+        model.getProcessAdm().cout <<" *** Iterations diverged, terminating..."
+                                   << std::endl;
         return SIM::DIVERGED;
 
       default:
@@ -388,6 +390,8 @@ SIM::ConvStatus NewmarkSIM::solveStep (TimeStep& param, SIM::SolutionMode,
           return SIM::FAILURE;
       }
 
+  model.getProcessAdm().cout <<" *** No convergence in "<< maxit
+                             <<" iterations, terminating..."<< std::endl;
   return SIM::DIVERGED;
 }