teth_harm Subroutine

private subroutine teth_harm(r, params, enrg, frc)

Calculates energy and its derivative for harmonic tether interaction. See teth_harm_set.

Arguments

Type IntentOptional AttributesName
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

Called by

proc~~teth_harm~~CalledByGraph proc~teth_harm teth_harm proc~ia_get_tether_force ia_get_tether_force proc~ia_get_tether_force->proc~teth_harm proc~ia_add_tether_forces ia_add_tether_forces proc~ia_add_tether_forces->proc~ia_get_tether_force proc~ia_calc_forces ia_calc_forces proc~ia_calc_forces->proc~ia_add_tether_forces proc~calc_drift calc_drift proc~calc_drift->proc~ia_calc_forces proc~integrate_em integrate_em proc~integrate_em->proc~calc_drift proc~se_fval se_fval proc~se_fval->proc~calc_drift proc~bds_run bds_run proc~bds_run->proc~integrate_em proc~run run proc~run->proc~bds_run program~main main program~main->proc~run

Contents

None