13 lines
197 B
Text
13 lines
197 B
Text
id x = x;
|
|
|
|
const x y = x ;
|
|
|
|
data Maybe () where {
|
|
Just : Int -> Maybe ()
|
|
Nothing : Maybe ()
|
|
};
|
|
|
|
main = case (Just 5) of {
|
|
Just a => 10 ;
|
|
Nothing => 0 ;
|
|
}; --const (id 0) (id 'a') ;
|