math_transpose33 not used

This commit is contained in:
Martin Diehl 2015-04-08 18:33:08 +00:00
parent db657a7a9e
commit 7d0a1ebea6
2 changed files with 1 additions and 3 deletions

View File

@ -397,8 +397,7 @@ subroutine damage_anisoDuctile_LdAndItsTangent(Ld, dLd_dTstar3333, Tstar_v, ipc,
math_Mandel33to6, & math_Mandel33to6, &
math_tensorproduct, & math_tensorproduct, &
math_det33, & math_det33, &
math_mul33x33, & math_mul33x33
math_transpose33
implicit none implicit none
integer(pInt), intent(in) :: & integer(pInt), intent(in) :: &

View File

@ -353,7 +353,6 @@ subroutine damage_gurson_microstructure(ipc, ip, el)
use math, only: & use math, only: &
math_Mandel6to33, & math_Mandel6to33, &
math_mul33x33, & math_mul33x33, &
math_transpose33, &
math_I3, & math_I3, &
math_norm33 math_norm33