1 files changed, 8 insertions, 0 deletions
diff --git a/wheelwork.lisp b/wheelwork.lisp
index 6cebb66..8638c60 100644
--- a/wheelwork.lisp
+++ b/wheelwork.lisp
@@ -876,3 +876,11 @@ fires when the FOCUS slot of the current APPLICATION instance is changed.
                           ,(intern (symbol-name target))))
                         ,@body)))
 
+;;; Utility
+
+(define-symbol-macro +pi-over-180+ 0.017453292519943295d0)
+
+(defun radians (degrees)
+  "Converse DEGREES to radians"
+  (* degrees +pi-over-180+))
+