From 4ebf46d2ac32503f58ba2198fe45e42f13377c97 Mon Sep 17 00:00:00 2001 From: Christoph Kords Date: Fri, 23 Aug 2013 13:53:03 +0000 Subject: [PATCH] nonSchmidProjection was reset to zero each time during instance loop in init, so entries from previous instances got lost; fixed that --- code/constitutive_nonlocal.f90 | 1 - 1 file changed, 1 deletion(-) diff --git a/code/constitutive_nonlocal.f90 b/code/constitutive_nonlocal.f90 index a6af4acc8..ef8a89518 100644 --- a/code/constitutive_nonlocal.f90 +++ b/code/constitutive_nonlocal.f90 @@ -1012,7 +1012,6 @@ do i = 1,maxNinstance !* 3) negative screw at positive resolved stress !* 4) negative screw at negative resolved stress - nonSchmidProjection = 0.0_pReal do s = 1_pInt,ns do l = 1_pInt,lattice_NnonSchmid(myStructure) nonSchmidProjection(1:3,1:3,1,s,i) = nonSchmidProjection(1:3,1:3,1,s,i) &