stuff
This commit is contained in:
5
W1/fasto/tests/reduce.fo
Normal file
5
W1/fasto/tests/reduce.fo
Normal file
@ -0,0 +1,5 @@
|
||||
fun int incr(int a, int b) = a + b
|
||||
|
||||
fun int main() =
|
||||
let n = reduce(incr, 0, {1, 2, 3}) in
|
||||
write(n)
|
Reference in New Issue
Block a user