![]() |
libSUFR
a LIBrary of Some Useful Fortran Routines
|
Procedures to deal with geography and the Earth. More...
Functions/Subroutines | |
pure real(double) function | distance (lon1, lat1, lon2, lat2, miles) |
Compute the distance between two points over the Earth's surface. | |
pure real function | distance_r (lon1, lat1, lon2, lat2, miles) |
Compute the distance between two points over the Earth's surface – single-precision version of distance() | |
Procedures to deal with geography and the Earth.
pure real(double) function sufr_earth::distance | ( | real(double), intent(in) | lon1, |
real(double), intent(in) | lat1, | ||
real(double), intent(in) | lon2, | ||
real(double), intent(in) | lat2, | ||
logical, intent(in), optional | miles ) |
Compute the distance between two points over the Earth's surface.
lon1 | Longitude of first location (rad) |
lat1 | Latitude of first location (rad) |
lon2 | Longitude of second location (rad) |
lat2 | Latitude of second location (rad) |
miles | Return result in miles if present and True, otherwise return result in kilometres |
distance | The distance between the two points over the Earth's surface (in km or mi) |
Definition at line 42 of file earth.f90.
References distance(), sufr_kinds::double, and sufr_constants::earthr.
Referenced by distance(), and distance_r().
pure real function sufr_earth::distance_r | ( | real, intent(in) | lon1, |
real, intent(in) | lat1, | ||
real, intent(in) | lon2, | ||
real, intent(in) | lat2, | ||
logical, intent(in), optional | miles ) |
Compute the distance between two points over the Earth's surface – single-precision version of distance()
lon1 | Longitude of first location (rad) |
lat1 | Latitude of first location (rad) |
lon2 | Longitude of second location (rad) |
lat2 | Latitude of second location (rad) |
miles | Return result in miles if present and True, otherwise return result in kilometres |
distance_r | The distance between the two points over the Earth's surface (in km or mi) |
Definition at line 93 of file earth.f90.
References distance(), and distance_r().
Referenced by distance_r().