lean4-htt/tests/lean/bad_index.lean
2017-01-30 11:54:00 -08:00

5 lines
167 B
Text

inductive foo1 : Type -> Type
| mk : foo1 (list (foo1 punit)) -> foo1 (list (foo1 punit))
inductive foo2 : Type -> Type
| mk : foo2 (foo2 punit) -> foo2 (foo2 punit)