diff --git a/src/homogenization_damage.f90 b/src/homogenization_damage.f90 index c58d7d27e..59f39ce9f 100644 --- a/src/homogenization_damage.f90 +++ b/src/homogenization_damage.f90 @@ -150,6 +150,7 @@ module subroutine damage_nonlocal_putNonLocalDamage(phi,ce) ho = material_homogenizationID(ce) en = material_homogenizationEntry(ce) damagestate_h(ho)%state(1,en) = phi + current(ho)%phi(en) = phi end subroutine damage_nonlocal_putNonLocalDamage