10 lines
185 B
Text
10 lines
185 B
Text
exit
|
|
prelude import logic.eq
|
|
open tactic
|
|
set_option pp.notation false
|
|
|
|
theorem foo (A : Type) (a b c : A) (Hab : a = b) (Hbc : b = c) : a = c :=
|
|
begin
|
|
apply eq.trans,
|
|
apply Hab
|
|
end
|