churf/test_program
2023-03-20 17:40:09 +01:00

9 lines
123 B
Text

data Bool () where {
True : Bool ()
False : Bool ()
};
main : Bool () -> _Int ;
main x = case x of {
1 => 0
}