apply_displacement_constraint Subroutine

public subroutine apply_displacement_constraint(dof, val, k, f)

Applies a displacement constraint to the specified degree of freedom.

Arguments

Type IntentOptional Attributes Name
integer(kind=int32), intent(in) :: dof

The global degree-of-freedom to which the constraint should be applied.

real(kind=real64), intent(in) :: val

The value of the displacement constraint.

real(kind=real64), intent(inout), dimension(:,:) :: k

The stiffness matrix to which the constraint should be applied.

real(kind=real64), intent(inout), dimension(:) :: f

The external force vector to which the constraint should be applied.


Contents