2015-03-02 21:00:54 +00:00
|
|
|
import algebra.group
|
|
|
|
|
|
2015-05-07 23:20:20 +00:00
|
|
|
open eq algebra
|
2015-03-02 21:00:54 +00:00
|
|
|
|
|
|
|
|
definition foo {A : Type} (a b c : A) (H₁ : a = c) (H₂ : c = b) : a = b :=
|
|
|
|
|
begin
|
|
|
|
|
apply concat,
|
2015-10-14 01:35:16 +00:00
|
|
|
apply H₁,
|
2015-03-02 21:00:54 +00:00
|
|
|
apply H₂,
|
|
|
|
|
end
|
