MEF90DefMechBilinearFormDamage Subroutine

  • Blaise Bourdin (2012-19, bourdin@lsu.edu) Erwan Tanne (2012-19, erwan.tanne@gmail.com) Blaise Bourdin (2022, bourdin@mcmaster.ca) Alexis Marboeuf (2022, marboeua@mcmaster.ca)
  • 328 statements
  • Source File

public subroutine MEF90DefMechBilinearFormDamage(snesDamage, damage, A, M, MEF90DefMechCtx, ierr)

MEF90DefMechBilinearFormDamage:

Arguments

Type IntentOptional Attributes Name
type(tSNES), intent(in) :: snesDamage
type(tVec), intent(in) :: damage
type(tMat), intent(inout) :: A
type(tMat), intent(inout) :: M
type(MEF90DefMech_Type), intent(in) :: MEF90DefMechCtx
integer(kind=C_INT32_T), intent(inout) :: ierr