223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
code/crystallite.f90
View File

@ -921,6 +921,10 @@ subroutine crystallite_stressAndItsTangent(updateJaco)
crystallite_P(:,:,gg,ii,ee) = storedP(:,:,gg,ii,ee) crystallite_P(:,:,gg,ii,ee) = storedP(:,:,gg,ii,ee)
enddo; enddo; enddo 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) enddo; enddo; enddo ! element,ip,grain loop (e,i,g)
crystallite_converged = storedConvergenceFlag crystallite_converged = storedConvergenceFlag