D2EEDNone Subroutine

private subroutine D2EEDNone(self, HookesLaw, phi, psi, D2EEDPlus, D2EEDMinus, ierr)

D2EEDNone: Compute the second derivative of the positive and negative part of the elastic energy density (positive and negative stress) evaluated at the strain tensor Strain. without a split, D2EEDPlus = HookesLaw, D2EEDMinus = 0

Type Bound

MEF90DefMechSplitNone

Arguments

Type IntentOptional Attributes Name
class(MEF90DefMechSplitNone), intent(in) :: self
class(MEF90HookesLaw), intent(in) :: HookesLaw
class(mef90Mat), intent(in) :: phi
class(mef90Mat), intent(in) :: psi
real(kind=C_DOUBLE), intent(out) :: D2EEDPlus
real(kind=C_DOUBLE), intent(out) :: D2EEDMinus
integer(kind=C_INT32_T), intent(inout) :: ierr