![]() |
libSUFR
a LIBrary of Some Useful Fortran Routines
|
Procedures related to sports. More...
Functions/Subroutines | |
pure subroutine | cycling_power (mass, slope, vair, vgr, pwr_mech, pwr_air, pwr_climb) |
Compute the power used for cycling. Add the three components to get the total power. | |
pure subroutine | cycling_power_sp (mass, slope, vair, vgr, pwr_mech, pwr_air, pwr_climb) |
Compute the power used for cycling, single-precision wrapper for cycling_power. | |
subroutine | heartrate2power (gender, age, mass, hr, power, dpower) |
Convert heart rate to body power + uncertainty. | |
Procedures related to sports.
pure subroutine sufr_sports::cycling_power | ( | real(double), intent(in) | mass, |
real(double), intent(in) | slope, | ||
real(double), intent(in) | vair, | ||
real(double), intent(in) | vgr, | ||
real(double), intent(out) | pwr_mech, | ||
real(double), intent(out) | pwr_air, | ||
real(double), intent(out) | pwr_climb ) |
Compute the power used for cycling. Add the three components to get the total power.
mass | Mass of the rider + bike (kg) |
slope | Slope of the road, fraction |
vair | Air speed of the rider (m/s) |
vgr | Ground speed of the rider (m/s) |
pwr_mech | Power to overcome mechanical resistance (of a typical bike, W) (output) |
pwr_air | Power to overcome air resistance (W) (output) |
pwr_climb | Power to climb a given slope (W) (output) |
Definition at line 48 of file sports.f90.
References sufr_weather::air_density(), and sufr_kinds::double.
Referenced by cycling_power_sp().
pure subroutine sufr_sports::cycling_power_sp | ( | real, intent(in) | mass, |
real, intent(in) | slope, | ||
real, intent(in) | vair, | ||
real, intent(in) | vgr, | ||
real, intent(out) | pwr_mech, | ||
real, intent(out) | pwr_air, | ||
real, intent(out) | pwr_climb ) |
Compute the power used for cycling, single-precision wrapper for cycling_power.
mass | Mass of the rider + bike (kg) |
slope | Slope of the road, fraction |
vair | Air speed of the rider (m/s) |
vgr | Ground speed of the rider (m/s) |
pwr_mech | Power to overcome mechanical resistance (of a typical bike, W) (output) |
pwr_air | Power to overcome air resistance (W) (output) |
pwr_climb | Power to climb a given slope (W) (output) |
Definition at line 98 of file sports.f90.
References cycling_power(), and sufr_kinds::double.
subroutine sufr_sports::heartrate2power | ( | character, intent(in) | gender, |
real(double), intent(in) | age, | ||
real(double), intent(in) | mass, | ||
real(double), intent(in) | hr, | ||
real(double), intent(out) | power, | ||
real(double), intent(out) | dpower ) |
Convert heart rate to body power + uncertainty.
gender | Athlete's gender: f(emale) or m(ale) |
age | Athlete's age (years) |
mass | Athlete's body mass (kg) |
HR | Heart rate (beats per minute) |
power | Body power (W) (output) |
dpower | Uncertainty in body power (W) (output) |
Definition at line 134 of file sports.f90.
References sufr_kinds::double, and sufr_system::quit_program_error().