diff --git a/code/damage_anisoDuctile.f90 b/code/damage_anisoDuctile.f90
index d71418d4c..959cb23e5 100644
--- a/code/damage_anisoDuctile.f90
+++ b/code/damage_anisoDuctile.f90
@@ -397,8 +397,7 @@ subroutine damage_anisoDuctile_LdAndItsTangent(Ld, dLd_dTstar3333, Tstar_v, ipc,
    math_Mandel33to6, &
    math_tensorproduct, &
    math_det33, &
-   math_mul33x33, &
-   math_transpose33
+   math_mul33x33
  
  implicit none
  integer(pInt), intent(in) :: &
diff --git a/code/damage_gurson.f90 b/code/damage_gurson.f90
index 0f849143f..715619b6d 100644
--- a/code/damage_gurson.f90
+++ b/code/damage_gurson.f90
@@ -353,7 +353,6 @@ subroutine damage_gurson_microstructure(ipc, ip, el)
  use math, only: &
    math_Mandel6to33, &
    math_mul33x33, &
-   math_transpose33, &
    math_I3, &
    math_norm33