Setter for harmonic tether interaction.
U = (1/2)*k*(r - r0)^2
User-set parameters:
k (spring constant)r0 (equilibrium distance)| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=rp), | intent(inout), | dimension(:) | :: | params | ||
| real(kind=rp), | intent(in), | optional | :: | k | ||
| real(kind=rp), | intent(in), | optional | :: | r0 |