diff --git a/PRIVATE b/PRIVATE index 22a23a9d5..4cd6c7350 160000 --- a/PRIVATE +++ b/PRIVATE @@ -1 +1 @@ -Subproject commit 22a23a9d5939d49d9d277c7066d9b68003a33324 +Subproject commit 4cd6c7350b0a9d4ad3efcb5fe6c6cfffa99c426f diff --git a/VERSION b/VERSION index 495329abd..d31504fd6 100644 --- a/VERSION +++ b/VERSION @@ -1 +1 @@ -3.0.0-alpha7-534-g51210a05e +3.0.0-alpha7-537-g1eee3d3ee diff --git a/src/phase_damage.f90 b/src/phase_damage.f90 index 7b27cf366..729309b82 100644 --- a/src/phase_damage.f90 +++ b/src/phase_damage.f90 @@ -210,7 +210,7 @@ module function phase_f_phi(phi,co,ce) result(f) select case(phase_damage(ph)) case(DAMAGE_ISOBRITTLE_ID,DAMAGE_ANISOBRITTLE_ID) f = 1.0_pREAL & - - phi*damageState(ph)%state(1,en) + - 2.0_pREAL * phi*damageState(ph)%state(1,en) case default f = 0.0_pREAL end select