From 4581329cde6cfb64399be48f58d67310ab19ee1b Mon Sep 17 00:00:00 2001 From: Preston Pan Date: Sat, 7 Jan 2023 09:54:40 -0800 Subject: include working --- doc/fib.nxs | 5 ----- doc/main.nxs | 5 ++--- 2 files changed, 2 insertions(+), 8 deletions(-) (limited to 'doc') diff --git a/doc/fib.nxs b/doc/fib.nxs index e09e7a4..59755c8 100644 --- a/doc/fib.nxs +++ b/doc/fib.nxs @@ -1,8 +1,3 @@ ;; Author: Andrei S (bind fib (lambda (x) ;; xth fib number (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))))) diff --git a/doc/main.nxs b/doc/main.nxs index 212f098..76fc95f 100644 --- a/doc/main.nxs +++ b/doc/main.nxs @@ -1,6 +1,5 @@ - +(include "fib.nxs") (bind factorial (lambda (n) (if (= n 0) 1 (* n (factorial (- n 1)))))) - +(fib 7) (+ (factorial 5) 10) -"hello world!" -- cgit