From 7f9207d9742c062c2a23ca53aa48420217558e7a Mon Sep 17 00:00:00 2001 From: Jan Tuomi Date: Wed, 24 Nov 2021 22:47:23 +0200 Subject: Recursion working oh yes --- samples/sample1.code | 26 +++++++++++--------------- 1 file changed, 11 insertions(+), 15 deletions(-) (limited to 'samples') 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 -- cgit v1.3