polishing/fixing tests

PRIVATE

@@ -1 +1 @@
-Subproject commit 535310ae792895d1eca5d45af335cd7e227af145
+Subproject commit c55d060b409c8a610b7fe8722fb756c1ed93c7ad

examples/config/Phase_Damage.config

@@ -1,2 +0,0 @@
-damage_diffusion11              1.0
-damage_mobility                 0.001

examples/config/Source_Damage_IsoBrittle.config

@@ -1,5 +0,0 @@
-(source) damage_isoBrittle
-isobrittle_criticalStrainEnergy 1400000.0
-isobrittle_atol                 0.01
-isobrittle_N                    1.0
-(output) isoBrittle_DrivingForce

src/mesh/DAMASK_mesh.f90

@@ -338,15 +338,15 @@ program DAMASK_mesh
         cutBack = .False.
         if(.not. all(solres(:)%converged .and. solres(:)%stagConverged)) then                       ! no solution found
           if (cutBackLevel < maxCutBack) then                                                       ! do cut back
-            print'(/,a)', ' cut back detected'
             cutBack = .True.
             stepFraction = (stepFraction - 1) * subStepFactor                                       ! adjust to new denominator
             cutBackLevel = cutBackLevel + 1
             time    = time - timeinc                                                                ! rewind time
             timeinc = timeinc/2.0_pReal
+            print'(/,a)', ' cutting back'
           else                                                                                      ! default behavior, exit if spectral solver does not converge
-            call IO_warning(850)
-            call quit(1)                                                                            ! quit
+            if (worldrank == 0) close(statUnit)
+            call IO_error(950)
           endif
         else
           guess = .true.                                                                            ! start guessing after first converged (sub)inc