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

does not change during the iteration

This commit is contained in:
Martin Diehl 2020-03-31 08:09:41 +02:00
parent 81c8ffe5c1
commit 2080749189
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/crystallite.f90
View File

@ -1033,10 +1033,10 @@ subroutine integrateStateFPI
if(crystallite_todo(g,i,e) .and. .not. crystallite_converged(g,i,e) .and. & if(crystallite_todo(g,i,e) .and. .not. crystallite_converged(g,i,e) .and. &
(.not. nonlocalBroken .or. crystallite_localPlasticity(g,i,e)) ) then (.not. nonlocalBroken .or. crystallite_localPlasticity(g,i,e)) ) then
iteration: do NiterationState = 1, num%nState
p = material_phaseAt(g,e); c = material_phaseMemberAt(g,i,e) p = material_phaseAt(g,e); c = material_phaseMemberAt(g,i,e)
iteration: do NiterationState = 1, num%nState
plasticState(p)%previousDotState2(:,c) = merge(plasticState(p)%previousDotState(:,c),& plasticState(p)%previousDotState2(:,c) = merge(plasticState(p)%previousDotState(:,c),&
0.0_pReal,& 0.0_pReal,&
NiterationState > 1) NiterationState > 1)