summaryrefslogtreecommitdiff
path: root/test.pez
blob: 28ac3de9c233c922d573df36c9bd191833ec8447 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
~fib= {[x]
    x < 2 ? x : fib[x - 1] + fib[x - 2] 
}

printf["fib[10] = %a\n", fib[10]]

@sum: {[xs] @a = 0
    @n: xs.length
    FOR [@i: 0][< n][+ 1] (
        a += xs[i]
    )
    a
}

(@l: #[1,5,-2,7]
    printf["sum[%a] = %a\n", l, sum[l]])