solveCM Subroutine

public subroutine solveCM(obj, Algorithm)

update displacement udate traction force

Type Bound

ContactMechanics_

Arguments

Type IntentOptional Attributes Name
class(ContactMechanics_), intent(inout), target :: obj
character(len=*), intent(in) :: Algorithm