Idris2/tests/idris2/casetree004/PiMatch.idr

4 lines
74 B
Idris

idMatch : Type -> Bool
idMatch ((x : Type) -> x) = True
idMatch _ = False