calc_tension Function

public function calc_tension(W_, lc_, lp_, d_) result(T_)

Arguments

Type IntentOptional AttributesName
real, intent(in) :: W_

Weight of the object (kg)

real, intent(in) :: lc_

length of the cable (m)

real, intent(in) :: lp_

Length of the pole (m)

real, intent(in) :: d_

Distance to attach the weight (m)

Return Value real

Tension in N


Contents

None