Idris2/tests/idris2/interactive/interactive033/UninhIndent.idr
2023-09-07 14:57:22 +01:00

10 lines
281 B
Idris

module UninhIndent
data MyElem : a -> List a -> Type where
MyHere : MyElem x (x :: xs)
MyThere : (later : MyElem x xs) -> MyElem x (y :: xs)
Uninhabited (MyElem a []) where
uninhabited c = ?uninhabited_rhs