Idris2/tests/idris2/total/total008/partial.idr
2023-09-07 14:57:22 +01:00

13 lines
174 B
Idris

import Data.List
interface Foo a where
covering
foo : a -> ()
Foo (Maybe String) where
foo Nothing = ()
foo (Just x) = ()
Foo (Maybe Int) where
foo Nothing = ()