libtellurian_distance.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

/* See LICENSE file for copyright and license details. */
#include "common.h"


double
libtellurian_distance(double latitude1, double longitude1,
                      double latitude2, double longitude2,
                      double *azimuth1_out, double *azimuth2_out)
{
	double r;
	latitude1 = radians(latitude1);
	longitude1 = radians(longitude1);
	latitude2 = radians(latitude2);
	longitude2 = radians(longitude2);
	r = libtellurian_distance_radians(latitude1, longitude1, latitude2, longitude2, azimuth1_out, azimuth2_out);
	if (azimuth1_out)
		*azimuth1_out = degrees(*azimuth1_out);
	if (azimuth2_out)
		*azimuth2_out = degrees(*azimuth2_out);
	return r;
}