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;
|