diff options
| author | bd <bdunahu@operationnull.com> | 2024-08-01 22:37:18 -0600 |
|---|---|---|
| committer | bd <bdunahu@operationnull.com> | 2024-08-01 22:37:18 -0600 |
| commit | 64fcac482de0ba1a401cfc42066196a38661405e (patch) | |
| tree | c8760685a6f28b12dedd08c00abc44ea7b731b26 /iterative-add/iterative-add.scm | |
| parent | 7cbaa3cfc3691147c28614783c3fc3ebfdc0b042 (diff) | |
Closure, coin sums, & number spiral generator
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)) |