fixed one last typo, now it finally compiles, sorry for this!
This commit is contained in:
parent
4d90d90886
commit
b7fc4fe6e4
|
@ -846,7 +846,7 @@ subroutine constitutive_TandItsTangent(T, dT_dFe, Fe, ipc, ip, el)
|
||||||
select case (phase_elasticity(material_phase(ipc,ip,el)))
|
select case (phase_elasticity(material_phase(ipc,ip,el)))
|
||||||
|
|
||||||
case (constitutive_hooke_label)
|
case (constitutive_hooke_label)
|
||||||
call constitutive_hooke_TstarAndItsTangent(T, dT_dFe, Fe, ipc, ip, el)
|
call constitutive_hooke_TandItsTangent(T, dT_dFe, Fe, ipc, ip, el)
|
||||||
|
|
||||||
end select
|
end select
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue