4 lines
171 B
Text
4 lines
171 B
Text
import logic
|
|
eval [all-transparent] λ (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
|