aboutsummaryrefslogtreecommitdiffstats
path: root/samples
diff options
context:
space:
mode:
Diffstat (limited to 'samples')
-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