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
Author
Bernat P Treserras (berna.nosp@m.t.pt.nosp@m.reser.nosp@m.ras@.nosp@m.mcgil.nosp@m.l.ca) McGill University
Date
March 6th, 2017
Based on the code from https://rosettacode.org/wiki/Haversine_formula#Fortran