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)) +) | 
