aboutsummaryrefslogtreecommitdiffstats
path: root/samples/sample1.code
blob: 168421b1f284e89b3396fe6d22be637acba82bb6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
triangle n = int.eq? n 1
        1
        (int.add
            n
            (triangle (int.sub n 1)));

triangle 500;

# factorial n =
#     int.eq? n 0
#         1
#         (int.mul n (factorial (int.sub n 1)));

# factorial 20;