Files
IPS_G-assignment/tests/scan.fo
2022-05-18 10:46:19 +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)