diff options
Diffstat (limited to 'fibo.lysp')
-rw-r--r-- | fibo.lysp | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/fibo.lysp b/fibo.lysp new file mode 100644 index 0000000..09fe16b --- /dev/null +++ b/fibo.lysp @@ -0,0 +1,17 @@ +(do + (define 'fibo '(n) + '(if (= n 0) 0 + '(if (= n 1) 1 + '(+ (fibo (- n 2)) (fibo (- n 1))) + ) + ) + ) + (print (fibo 1)) + (print (fibo 2)) + (print (fibo 3)) + (print (fibo 4)) + (print (fibo 5)) + (print (fibo 6)) + (print (fibo 7)) + (print (fibo 8)) +) |