summaryrefslogtreecommitdiff
path: root/sly/math.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2014-12-13 13:34:41 -0500
committerDavid Thompson <dthompson2@worcester.edu>2014-12-13 13:37:37 -0500
commitbf34569ee9a5e33ab53633f172d8f0543e059cad (patch)
treef30e1f1ebb4c0ff1cf1f3a1991bc73be552471d9 /sly/math.scm
parent171ee79bc610e400123775f7993cc1501b826d6a (diff)
math: Update docstring for make-lerp.
* sly/math.scm (make-lerp): Update docstring.
Diffstat (limited to 'sly/math.scm')
-rw-r--r--sly/math.scm14
1 files changed, 7 insertions, 7 deletions
diff --git a/sly/math.scm b/sly/math.scm
index 90545ac..0f55671 100644
--- a/sly/math.scm
+++ b/sly/math.scm
@@ -114,13 +114,13 @@ actually less than MAX."
(* x x))
(define (make-lerp + *)
- "Return a new procedure that accepts three arguments: A, B, and
-ALPHA. The returned procedure uses the procedures + and * to linearly
-interpolate a value between A and B. ALPHA should always be in the
-range [0, 1]."
- (lambda (a b alpha)
- (+ (* a (- 1 alpha))
- (* b alpha))))
+ "Return a new procedure that accepts three arguments: START, END,
+and ALPHA. The returned procedure uses the procedures + and * to
+linearly interpolate a value between START and END. ALPHA should
+always be in the range [0, 1]."
+ (lambda (start end alpha)
+ (+ (* start (- 1 alpha))
+ (* end alpha))))
(define lerp (make-lerp + *))