mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-06 23:08:46 +00:00
11 lines
171 B
Text
11 lines
171 B
Text
|
fun f (a) {
|
||
|
|
case a of
|
||
|
|
`a (x, y, z) -> write (x + y + z)
|
||
|
|
| `b (x, y, z) -> write (x + y + z)
|
||
|
|
esac
|
||
|
|
}
|
||
|
|
|
||
|
|
x := read ();
|
||
|
|
|
||
|
|
f (`a (100, 200, 300));
|
||
|
|
f (`b (500, 600, 700))
|