;;;; geo-constants.scm  -*- Scheme -*-
;;;; Kon Lovett, Jul '18

;1.0/298.257223563 (WGS '84)
(define-constant EARTH-FLATTENING 0.00335281066474748)

(define-constant EARTH-RADIUS-MILES 3963.188)
(define-constant EARTH-RADIUS-KILOMETERS 6378.137)