lower strain path modifer to 3%

This commit is contained in:
zhangc43 2016-05-03 10:38:04 -04:00
parent 1e176d20a4
commit 7c084f8bf5
1 changed files with 1 additions and 1 deletions

View File

@ -981,7 +981,7 @@ subroutine plastic_phenoplus_microstructure(orientation,ipc,ip,el,F0,Fe,Fp,Tstar
ENDDO LOOPMYNEIGHBORS ENDDO LOOPMYNEIGHBORS
plasticState(ph)%state(index_kappa+me_slip, of) = & plasticState(ph)%state(index_kappa+me_slip, of) = &
1.04_pReal + 0.04_pReal*ERF(4.0_pReal * maxval(ne_mprimes) - 4.0_pReal) 1.03_pReal + 0.03_pReal*ERF(4.0_pReal * maxval(ne_mprimes) - 4.0_pReal)
ENDDO LOOPMYSLIP ENDDO LOOPMYSLIP