Frank Vilhelmsen frankvilhelmsen

## haversine.clj
(ns util
  (:use clojure.contrib.generic.math-functions))

; http://en.wikipedia.org/wiki/Earth_radius
(def R 6367)

; rad argument to haversine function (180° d/πR).
(defn rad [x]
  (* x  (/ Math/PI 180)))
	(ns util
	(:use clojure.contrib.generic.math-functions))

	; http://en.wikipedia.org/wiki/Earth_radius
	(def R 6367)

	; rad argument to haversine function (180° d/πR).
	(defn rad [x]
	(* x (/ Math/PI 180)))