From 860594d9a40f7c1ed8029aac250eec818566958d Mon Sep 17 00:00:00 2001 From: Christoph Kords Date: Wed, 9 Nov 2011 10:26:00 +0000 Subject: [PATCH] forgot to multiply shearrate with timestep in order to get accumulated shear --- code/constitutive_nonlocal.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/code/constitutive_nonlocal.f90 b/code/constitutive_nonlocal.f90 index 642edcbab..504395502 100644 --- a/code/constitutive_nonlocal.f90 +++ b/code/constitutive_nonlocal.f90 @@ -2652,7 +2652,7 @@ do o = 1,phase_Noutput(material_phase(g,ip,el)) cs = cs + 6_pInt case('accumulatedshear') - constitutive_nonlocal_accumulatedShear(1:ns,g,ip,el) = constitutive_nonlocal_accumulatedShear(1:ns,g,ip,el) + sum(gdot,2) + constitutive_nonlocal_accumulatedShear(1:ns,g,ip,el) = constitutive_nonlocal_accumulatedShear(1:ns,g,ip,el) + sum(gdot,2)*dt constitutive_nonlocal_postResults(cs+1:cs+ns) = constitutive_nonlocal_accumulatedShear(1:ns,g,ip,el) cs = cs + ns