mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-06 06:48:48 +00:00
20 lines
167 B
Text
20 lines
167 B
Text
|
fun f (l) {
|
||
|
|
case l of
|
||
|
|
{} -> skip
|
||
|
|
| h : tl -> h (); f (tl)
|
||
|
|
esac
|
||
|
|
}
|
||
|
|
|
||
|
|
fun a () {
|
||
|
|
write (0)
|
||
|
|
}
|
||
|
|
|
||
|
|
fun b () {
|
||
|
|
write (1)
|
||
|
|
}
|
||
|
|
|
||
|
|
fun c () {
|
||
|
|
write (2)
|
||
|
|
}
|
||
|
|
|
||
|
|
f ({a, b, c})
|