mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-12-20 10:02:03 +03:00
13 lines
270 B
Idris
13 lines
270 B
Idris
module Uninh
|
|
|
|
data MyElem : a -> List a -> Type where
|
|
MyHere : MyElem x (x :: xs)
|
|
MyThere : (later : MyElem x xs) -> MyElem x (y :: xs)
|
|
|
|
noIndent : (MyElem a []) -> Void
|
|
noIndent c = ?noIndent_rhs
|
|
|
|
Uninhabited (MyElem a []) where
|
|
uninhabited c = ?uninhabited_rhs
|
|
|