diff options
| author | Mike Vink <mike1994vink@gmail.com> | 2023-03-03 09:33:13 +0100 |
|---|---|---|
| committer | Mike Vink <mike1994vink@gmail.com> | 2023-03-03 09:33:13 +0100 |
| commit | 0988f106514e61b59f53e7fe3c599e03edcfd47c (patch) | |
| tree | f8faeb9e9d5047828c7c386eb4db363212e52cb6 /tree-recursion.rkt | |
| parent | b99dd822372b63c994bb97ff9971cfc64c721552 (diff) | |
folder
Diffstat (limited to 'tree-recursion.rkt')
| -rw-r--r-- | tree-recursion.rkt | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/tree-recursion.rkt b/tree-recursion.rkt deleted file mode 100644 index 031d40f..0000000 --- a/tree-recursion.rkt +++ /dev/null @@ -1,19 +0,0 @@ -#lang sicp -(define (myfun n) - (cond ((< n 3) n) - (else (+ (myfun (- n 1)) - (* 2 (myfun (- n 2))) - (* 3 (myfun (- n 3))))))) -(myfun 11) - -(define (myfun2 n) - (define (mf i a b c) - (cond ((< n 3) n) - ((> i n) a) - (else (mf (+ i 1) - (+ a (* 2 b) (* 3 c)) - a - b)))) - (mf 3 2 1 0)) - -(myfun 11) |