MEF90DefMechWork Subroutine

public subroutine MEF90DefMechWork(MEF90DefMechCtx, bodyForceWork, boundaryForceWork, ierr)

Arguments

Type IntentOptional Attributes Name
type(MEF90DefMech_Type), intent(in) :: MEF90DefMechCtx
real(kind=C_DOUBLE), dimension(:), pointer :: bodyForceWork
real(kind=C_DOUBLE), dimension(:), pointer :: boundaryForceWork
integer(kind=C_INT32_T), intent(inout) :: ierr