blob: e0f6dcdc85f46c1b8ab706a1bbd424ffc2c9e939 (
plain)
1
2
3
4
5
6
7
8
9
|
;;;; utils.lisp
(in-package #:wheelwork)
(define-symbol-macro +pi-over-180+ 0.017453292519943295d0)
(defun radians (degrees)
"Converse DEGREES to radians"
(* degrees +pi-over-180+))
|