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

triangle 500;

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

# factorial 20;