corrected state integration
This commit is contained in:
parent
eecb78665c
commit
f16244d240
|
@ -312,7 +312,7 @@ subroutine damage_isoBrittle_microstructure(C, Fe, subdt, ipc, ip, el)
|
|||
damageState(phase)%state(1,constituent) = &
|
||||
damageState(phase)%state(2,constituent) + &
|
||||
(damageState(phase)%subState0(1,constituent) - damageState(phase)%state(2,constituent))* &
|
||||
exp(-subdt/(damageState(phase)%state(2,constituent)*lattice_DamageMobility(phase)))
|
||||
exp(-subdt/lattice_DamageMobility(phase))
|
||||
|
||||
end subroutine damage_isoBrittle_microstructure
|
||||
|
||||
|
|
Loading…
Reference in New Issue