aboutsummaryrefslogtreecommitdiffstats
path: root/samples/sample1.code
diff options
context:
space:
mode:
authorJan Tuomi <jans.tuomi@gmail.com>2021-11-24 22:47:23 +0200
committerJan Tuomi <jans.tuomi@gmail.com>2021-11-25 09:53:55 +0200
commit7f9207d9742c062c2a23ca53aa48420217558e7a (patch)
treeffcc15beb0c26245c8aefd65b6206ce30df370ec /samples/sample1.code
parent1baf725a38b90c13e5afacebd18fb3799a2bd081 (diff)
Recursion working oh yes
Diffstat (limited to 'samples/sample1.code')
-rw-r--r--samples/sample1.code26
1 files changed, 11 insertions, 15 deletions
diff --git a/samples/sample1.code b/samples/sample1.code
index a675849..168421b 100644
--- a/samples/sample1.code
+++ b/samples/sample1.code
@@ -1,18 +1,14 @@
-# result =
-# bool.to-string
-# (int.eq? 2 2);
+triangle n = int.eq? n 1
+ 1
+ (int.add
+ n
+ (triangle (int.sub n 1)));
-# string.eq? result "true";
+triangle 500;
-# string.eq?
-# (bool.to-string
-# (int.eq? 2 2))
-# "true";
+# factorial n =
+# int.eq? n 0
+# 1
+# (int.mul n (factorial (int.sub n 1)));
-# string.eq?
-# (bool.to-string
-# (int.eq? 2 2));
-
-string.eq?
- (bool.to-string
- true);
+# factorial 20; \ No newline at end of file