displace Subroutine

public subroutine displace(Kmat, Bvec, u_nod_x, u_nod_dis_x, u_nod_y, u_nod_dis_y)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=8),	intent(inout)			::	Kmat(:,:)
real(kind=8),	intent(inout)			::	Bvec(:)
integer,	intent(in)			::	u_nod_x(:)
real(kind=8),	intent(in)			::	u_nod_dis_x(:)
integer,	intent(in)			::	u_nod_y(:)
real(kind=8),	intent(in)			::	u_nod_dis_y(:)

Contents

None