From 4f9dbfa193a8ab188a555575c81a43bbaee2255e Mon Sep 17 00:00:00 2001 From: Franz Roters Date: Fri, 2 Aug 2013 07:59:55 +0000 Subject: [PATCH] last commit also solves problem with infinite loop in case of a cutback in homogenization corrected indentation of a comment --- code/crystallite.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code/crystallite.f90 b/code/crystallite.f90 index 7a692b4aa..b36c93139 100644 --- a/code/crystallite.f90 +++ b/code/crystallite.f90 @@ -935,7 +935,7 @@ subroutine crystallite_stressAndItsTangent(updateJaco,rate_sensitivity) write(6,*) endif #endif - else ! this crystallite just converged for the entire timestep + else ! this crystallite just converged for the entire timestep crystallite_todo(g,i,e) = .false. ! so done here !$OMP FLUSH(crystallite_todo) if (iand(debug_level(debug_crystallite),debug_levelBasic) /= 0_pInt &