From c620d528fb9d9efbac559002d23857623e71df05 Mon Sep 17 00:00:00 2001 From: Preston Pan Date: Fri, 6 Jan 2023 20:48:56 -0800 Subject: whoops, fixed concat. Include in the making --- doc/fib.nxs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'doc') diff --git a/doc/fib.nxs b/doc/fib.nxs index 130f99d..e09e7a4 100644 --- a/doc/fib.nxs +++ b/doc/fib.nxs @@ -1,4 +1,8 @@ ;; Author: Andrei S (bind fib (lambda (x) ;; xth fib number -(if (< x 2) x (+ (fib (- x 1)) (fib (- x 2)))))) + (if (< x 2) x (+ (fib (- x 1)) (fib (- x 2)))))) + (fib 7) + +(bind fibseq (lambda (n) +(if (= 0 n) 0 (begin (+ n 1) (fib n))))) -- cgit