mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-05 22:38:44 +00:00
11 lines
No EOL
171 B
Text
11 lines
No EOL
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)) |