foreng_science_phys Module



Contents


Functions

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

public function calc_decibels(P1_, P2_) result(dB_)

Arguments

Type IntentOptional AttributesName
real, intent(in) :: P1_
real, intent(in) :: P2_

Return Value real

public function calc_gravity(m1, m2, r) result(F)

Arguments

Type IntentOptional AttributesName
real(kind=real64), intent(in) :: m1

mass of body 1 in kg

real(kind=real64), intent(in) :: m2

mass of body 2 in kg

real(kind=real64), intent(in) :: r

distance between bodies in meters

Return Value real(kind=real64)

Gravitational force