lean4-htt/tests/lean/def1.lean
2016-09-20 08:32:37 -07:00

5 lines
160 B
Text

universe variable u
variable {A : Type u}
lemma foo (f : A → A → A) (a b c : A) (H₁ : a = b) (H₂ : c = b) : f a = f c :=
H₂ ▸ eq.symm H₁ ▸ rfl