diff options
| author | Preston Pan <preston@nullring.xyz> | 2023-01-07 09:54:40 -0800 |
|---|---|---|
| committer | Preston Pan <preston@nullring.xyz> | 2023-01-07 09:54:40 -0800 |
| commit | 4581329cde6cfb64399be48f58d67310ab19ee1b (patch) | |
| tree | c76893896ae4375c618ecffad71fa9ffb3717be2 /doc | |
| parent | c620d528fb9d9efbac559002d23857623e71df05 (diff) | |
include working
Diffstat (limited to 'doc')
| -rw-r--r-- | doc/fib.nxs | 5 | ||||
| -rw-r--r-- | doc/main.nxs | 5 |
2 files changed, 2 insertions, 8 deletions
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!" |