sorry, compilation problem corrected...

This commit is contained in:
Philip Eisenlohr 2009-03-06 11:47:26 +00:00
parent f84d2abedc
commit 41d9e2d805
1 changed files with 1 additions and 1 deletions

View File

@ -287,7 +287,7 @@ subroutine constitutive_j2_LpAndItsTangent(Lp,dLp_dTstar,Tstar_v,Temperature,sta
Tstar33 = math_Mandel6to33(Tstar_v)
squarenorm_Tstar = math_mul6x6(Tstar_v,Tstar_v)
norm_Tstar = dsqrt(Tstar)
norm_Tstar = dsqrt(squarenorm_Tstar)
!* Calculation of Lp
Lp = Tstar33/norm_Tstar*constitutive_j2_gdot0(matID)/constitutive_j2_fTaylor(matID)* &