From 2c470b2b570484ead8402e062bf42538b021a1d2 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson2@worcester.edu>
Date: Fri, 26 Sep 2014 21:11:05 -0400
Subject: math: Add 2pi constant.

* sly/math.scm (2pi): New variable.
---
 sly/math.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/sly/math.scm b/sly/math.scm
index 0f7ede3..4169ae4 100644
--- a/sly/math.scm
+++ b/sly/math.scm
@@ -23,7 +23,7 @@
 ;;; Code:
 
 (define-module (sly math)
-  #:export (pi pi/2
+  #:export (pi 2pi pi/2
             degrees->radians
             radians->degrees
             sin-degrees
@@ -61,6 +61,7 @@
 ;;      817488               152092096
 ;;
 (define pi 3.141592654)
+(define 2pi (* pi 2))
 (define pi/2 (/ pi 2))
 
 (define (degrees->radians angle)
-- 
cgit v1.2.3