Evaluates the potential & its derivative for Marko-Siggia bond. See bond_ms_set.
If bond length exceeds maximum extensible spring length, an error will be
reported as ierr = 1
.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=rp), | intent(in) | :: | r | |||
real(kind=rp), | intent(in), | dimension(:) | :: | params | ||
real(kind=rp), | intent(out) | :: | enrg | |||
real(kind=rp), | intent(out) | :: | frc | |||
integer, | intent(out) | :: | ierr |