Idris2/tests/idris2/data/data002/Test.idr

12 lines
163 B
Idris
Raw Normal View History

%default total
data Odd : Nat -> Type
data Even : Nat -> Type
data Odd where
SO : Even n -> Odd (S n)
data Even where
Z : Even Z
SE : Odd n -> Even (S n)