From 09e6857ae73249bc7433f2971dcf291c70e4c766 Mon Sep 17 00:00:00 2001 From: Mattias Andrée Date: Sun, 20 Oct 2024 17:28:46 +0200 Subject: Fourth commit MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Signed-off-by: Mattias Andrée --- libtellurian_coarse_distance.c | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) (limited to 'libtellurian_coarse_distance.c') diff --git a/libtellurian_coarse_distance.c b/libtellurian_coarse_distance.c index 8f056d1..3776855 100644 --- a/libtellurian_coarse_distance.c +++ b/libtellurian_coarse_distance.c @@ -1,5 +1,6 @@ /* See LICENSE file for copyright and license details. */ #include "common.h" +#ifndef TEST double @@ -12,3 +13,21 @@ libtellurian_coarse_distance(double latitude1, double longitude1, longitude2 = radians(longitude2); return libtellurian_coarse_distance_radians(latitude1, longitude1, latitude2, longitude2); } + + +#else + + +int +main(void) +{ + ASSERT(libtellurian_coarse_distance(0, 0, 0, 0) == libtellurian_coarse_distance_radians(0, 0, 0, 0)); + ASSERT(libtellurian_coarse_distance(90, 0, 0, 0) == libtellurian_coarse_distance_radians(D90, 0, 0, 0)); + ASSERT(libtellurian_coarse_distance(90, 180, 0, 0) == libtellurian_coarse_distance_radians(D90, D180, 0, 0)); + ASSERT(libtellurian_coarse_distance(90, 180, -45, 0) == libtellurian_coarse_distance_radians(D90, D180, -D45, 0)); + ASSERT(libtellurian_coarse_distance(90, 180, -45, -30) == libtellurian_coarse_distance_radians(D90, D180, -D45, -D30)); + return 0; +} + + +#endif -- cgit v1.2.3-70-g09d2