rover

commit 4b1f2ee9238bd561ab3d67ef2095078901dbf2c1
parent 33243ca123ec438dd00028b76475e2790c9ca05e
Author: Daniel Barlow <dan@telent.net>
Date:   Sun, 22 Jan 2023 21:39:56 +0000

add test for southern hemisphere

Diffstat:
M
rover.fnl
 | 
4
++++

1 file changed, 4 insertions(+), 0 deletions(-)
diff --git a/rover.fnl b/rover.fnl
@@ -141,6 +141,10 @@
         (execute (rover 0 45 :e) [:f])
         (where {:x x } (< (math.abs (- x 1.4141)) 0.001)))
 
+(expect "At 45 degrees latitude south, one unit of drive is (sqrt 2) degrees"
+        (execute (rover 0 -45 :e) [:f])
+        (where {:x x :y -45} (< (math.abs (- x 1.4141)) 0.001)))
+
 ;; valid longitudes are -180 .. 180
 
 (expect "Longitude wraps from positive to  negative when travelling west"