teth_rigid_set Subroutine

private subroutine teth_rigid_set(params, r0, eps)

Setter for rigid tether interaction.

User-set parameters:

• params(1) = r0 (fixed separation distance)
• params(2) = eps (allowed tolerance)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=rp),	intent(inout),		dimension(:)	::	params
real(kind=rp),	intent(in),	optional		::	r0
real(kind=rp),	intent(in),	optional		::	eps

Contents

None