latlon_dist.f90 File Reference
Functions/Subroutines | |
Real function | latlon_dist (deglat1, deglon1, deglat2, deglon2) |
Computes the distance of a rhumb line connecting two points on a sphere using Harversine formula The default used radius is The Authalic radius (equal area - hyothetical. perfect sphere) - 6371.0072 [km] More... | |
Function/Subroutine Documentation
Real function latlon_dist | ( | real, intent(in) | deglat1, |
real, intent(in) | deglon1, | ||
real, intent(in) | deglat2, | ||
real, intent(in) | deglon2 | ||
) |
Computes the distance of a rhumb line connecting two points on a sphere using Harversine formula The default used radius is The Authalic radius (equal area - hyothetical. perfect sphere) - 6371.0072 [km]
- Parameters
-
deglat1 [in] Longitude of the first point (degrees) deglon1 [in] Latitude of the first point (degrees) deglat2 [in] Longitude of the second point (degrees) deglon2 [in] Latitude of the second point (degrees)
- Returns
- The distance between the 2 points, [km] by default
- Date
- March 6th, 2017
- Based on the code from https://rosettacode.org/wiki/Haversine_formula#Fortran