From 7c084f8bf585fed6cea9a921d475ac6acaaed9bb Mon Sep 17 00:00:00 2001 From: zhangc43 Date: Tue, 3 May 2016 10:38:04 -0400 Subject: [PATCH] lower strain path modifer to 3% --- src/plastic_phenoplus.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/plastic_phenoplus.f90 b/src/plastic_phenoplus.f90 index 2e5fd3fcd..38561af60 100644 --- a/src/plastic_phenoplus.f90 +++ b/src/plastic_phenoplus.f90 @@ -981,7 +981,7 @@ subroutine plastic_phenoplus_microstructure(orientation,ipc,ip,el,F0,Fe,Fp,Tstar ENDDO LOOPMYNEIGHBORS 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