11 lines
189 B
Text
11 lines
189 B
Text
import algebra.group
|
|
|
|
open eq path_algebra
|
|
|
|
definition foo {A : Type} (a b c : A) (H₁ : a = c) (H₂ : c = b) : a = b :=
|
|
begin
|
|
apply concat,
|
|
rotate 1,
|
|
apply H₂,
|
|
apply H₁
|
|
end
|