lean4-htt/old_tests/tests/lean/run/1609.lean
2018-04-10 12:56:55 -07:00

4 lines
158 B
Text

universe variable u
inductive pred : ∀ (X : Type u), list X → Type (u+1)
| foo X (l1 : list X) (l2 : list (option X)) : pred (option X) l2 → pred X l1