10 lines
141 B
Text
10 lines
141 B
Text
data Bool () where {
|
|
True : Bool ()
|
|
False : Bool ()
|
|
};
|
|
|
|
main : Bool () -> Int ;
|
|
main b = case b of {
|
|
False => 0;
|
|
True => 0
|
|
}
|