lean4-htt/old_tests/tests/lean/bad_index.lean
2018-04-10 12:56:55 -07: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)