lean4-htt/tests/lean/eta_bug.lean
2016-09-17 12:54:20 -07:00

4 lines
145 B
Text

--
eval λ (A : Type*) (x y : A) (H₁ : x = y) (H₂ : y = x), eq.trans H₁ H₂
-- Should not reduce to
-- λ (A : Type*) (x y : A), eq.trans