Merge remote-tracking branch 'origin/development' into 256-grid-geometry-displacement-reconstruction
This commit is contained in:
commit
947cb15260
2
PRIVATE
2
PRIVATE
|
@ -1 +1 @@
|
||||||
Subproject commit 22a23a9d5939d49d9d277c7066d9b68003a33324
|
Subproject commit 4cd6c7350b0a9d4ad3efcb5fe6c6cfffa99c426f
|
|
@ -210,7 +210,7 @@ module function phase_f_phi(phi,co,ce) result(f)
|
||||||
select case(phase_damage(ph))
|
select case(phase_damage(ph))
|
||||||
case(DAMAGE_ISOBRITTLE_ID,DAMAGE_ANISOBRITTLE_ID)
|
case(DAMAGE_ISOBRITTLE_ID,DAMAGE_ANISOBRITTLE_ID)
|
||||||
f = 1.0_pReal &
|
f = 1.0_pReal &
|
||||||
- phi*damageState(ph)%state(1,en)
|
- 2.0_pREAL * phi*damageState(ph)%state(1,en)
|
||||||
case default
|
case default
|
||||||
f = 0.0_pReal
|
f = 0.0_pReal
|
||||||
end select
|
end select
|
||||||
|
|
Loading…
Reference in New Issue