Merge remote-tracking branch 'origin/development' into 256-grid-geometry-displacement-reconstruction

2023-06-05 11:04:19 +02:00 · 2023-06-05 11:04:19 +02:00 · 947cb15260
parent 898aaf1068 fd55fe2b9f
commit 947cb15260
3 changed files with 3 additions and 3 deletions
--- a/2
+++ b/2
@ -1 +1 @@
-Subproject commit 22a23a9d5939d49d9d277c7066d9b68003a33324
+Subproject commit 4cd6c7350b0a9d4ad3efcb5fe6c6cfffa99c426f
--- a/2
+++ b/2
@ -1 +1 @@
-3.0.0-alpha7-534-g51210a05e
+3.0.0-alpha7-537-g1eee3d3ee
--- 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