Idris2/tests/idris2/reg/reg041/tuple.idr
2023-09-07 14:57:22 +01:00

6 lines
85 B
Idris

tupleBug : Pair () a -> ()
tupleBug (_, (_, _)) = ()
odd : a -> Bool
odd () = False