Idris2/tests/idris2/with/with007/With0.idr

6 lines
90 B
Idris
Raw Normal View History

%default total
test : (0 n : Nat) -> Type -> Type
test n a with 0 (n + n)
_ | twon = a