MEF90DefMechBilinearFormDisplacement Subroutine

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

public subroutine MEF90DefMechBilinearFormDisplacement(snesDisplacement, displacement, A, M, MEF90DefMechCtx, ierr)

MEF90DefMechBilinearFormDisplacement:

Arguments

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