Move testing to sandbox dir

This commit is contained in:
Scott Richmond 2022-05-18 18:28:44 -04:00
parent 8cbc516a66
commit 9e25f24b3f
2 changed files with 1 additions and 18 deletions

1
.gitignore vendored
View File

@ -17,3 +17,4 @@ pom.xml.asc
.clj-kondo/
.cpcache/
**/.DS_Store
/sandbox

View File

@ -1,18 +0,0 @@
fn fib (n) -> if eq (n, 0)
then 1
else if eq (n, 1)
then 1
else add (fib (sub (n, 1)), fib (sub (n, 2)))
fn fact {
(n) -> fact (n, 1)
(1, acc) -> acc
(n, acc) -> fact (sub (n, 1), mult (n, acc))
}
ns Recursive {
fact
fib
}
Recursive :fib (25)