lean4-htt/tests/lean/quot_ind_bug.lean
2016-09-10 22:51:07 -07:00

6 lines
197 B
Text

open quot
variables {A : Type} [s : setoid A] {B : quot s → Prop} (c : ∀ (a : A), B (quot.mk a)) (a : A)
check (quot.ind c ⟦a⟧ : B ⟦a⟧)
check c a
eval (quot.ind c ⟦a⟧ : B ⟦a⟧)