diff options
Diffstat (limited to 'iterative-add/iterative-add.scm')
-rw-r--r-- | iterative-add/iterative-add.scm | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/iterative-add/iterative-add.scm b/iterative-add/iterative-add.scm deleted file mode 100644 index 45c6cf9..0000000 --- a/iterative-add/iterative-add.scm +++ /dev/null @@ -1,15 +0,0 @@ -(define-module (iterative-add) - #:export (iterative-add-generator)) - -(define iterative-add - (let ((prev-num 0)) - (lambda (num) - (let ((result - (+ num prev-num))) - (set! prev-num num) - result)))) - -(define (iterative-add-generator num) - "Adds the previously received -number to the current one." - (iterative-add num)) |