From b7ee4318b7e1c4b4a801d431d17ba87a9ffe7e97 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Wed, 27 Feb 2019 07:21:40 +0100 Subject: [PATCH] copy and paste error --- src/material.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/material.f90 b/src/material.f90 index 49ee38ee3..3ef22a199 100644 --- a/src/material.f90 +++ b/src/material.f90 @@ -981,7 +981,7 @@ subroutine material_allocateSourceState(phase,of,NofMyPhase,& sourceState(phase)%p(of)%sizeState = sizeState sourceState(phase)%p(of)%sizeDotState = sizeDotState sourceState(phase)%p(of)%sizeDeltaState = sizeDeltaState - plasticState(phase)%offsetDeltaState = sizeState-sizeDeltaState ! deltaState occupies latter part of state by definition + sourceState(phase)%p(of)%offsetDeltaState = sizeState-sizeDeltaState ! deltaState occupies latter part of state by definition allocate(sourceState(phase)%p(of)%aTolState (sizeState), source=0.0_pReal) allocate(sourceState(phase)%p(of)%state0 (sizeState,NofMyPhase), source=0.0_pReal)