teth_rigid Subroutine

private subroutine teth_rigid(r, params, enrg, frc, ierr)

Not implemented, needs constraint formalism. See teth_rigid_set.

Calculates energy for rigid tether interaction.

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
integer, intent(out) :: ierr

Called by

proc~~teth_rigid~~CalledByGraph proc~teth_rigid teth_rigid proc~ia_get_tether_force ia_get_tether_force proc~ia_get_tether_force->proc~teth_rigid 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