Files
IPS_W-assignments/W1/fasto/tests/scan.fo
NikolajDanger b9ef4bb00e stuff
2022-04-30 16:18:13 +02:00

9 lines
163 B
Plaintext

fun int incr(int a, int b) = a + b
fun int writeInt(int n) = write(n)
fun [int] main() =
let a = {1, 2, 3} in
let b = scan(incr, 0, a) in
map(writeInt, b)