report absolute value of accumulated_shear_slip in dot state

This commit is contained in:
Tias Maiti 2015-09-11 17:44:26 +00:00
parent c53bf02fea
commit 840fd0e9fa
1 changed files with 1 additions and 1 deletions

View File

@ -1852,7 +1852,7 @@ subroutine plastic_dislotwin_dotState(Tstar_v,Temperature,ipc,ip,el)
DotRhoDipFormation(j)-DotRhoEdgeDipAnnihilation(j)-DotRhoEdgeDipClimb(j)
!* Dotstate for accumulated shear due to slip
plasticState(ph)%dotState(2_pInt*ns+j, of) = gdot_slip(j)
plasticState(ph)%dotState(2_pInt*ns+j, of) = abs(gdot_slip(j))
enddo
enddo