added stiffness state loop counter to nonlocal stiffness calculation

This commit is contained in:
Christoph Kords 2009-12-15 09:03:04 +00:00
parent d784153e0c
commit 26e9056f90
1 changed files with 6 additions and 2 deletions

View File

@ -921,6 +921,10 @@ subroutine crystallite_stressAndItsTangent(updateJaco)
crystallite_P(:,:,gg,ii,ee) = storedP(:,:,gg,ii,ee)
enddo; enddo; enddo
!$OMP CRITICAL (out)
debug_StiffnessStateLoopDistribution(NiterationState) = debug_StiffnessstateLoopDistribution(NiterationState) + 1
!$OMPEND CRITICAL (out)
enddo; enddo; enddo ! element,ip,grain loop (e,i,g)
crystallite_converged = storedConvergenceFlag