9 lines
No EOL
118 B
Text
9 lines
No EOL
118 B
Text
data True() where {
|
|
True: True()
|
|
};
|
|
main: Int;
|
|
main =
|
|
case True of {
|
|
True => 1;
|
|
_ => 0;
|
|
}; |