{A : Type} {x y1 y2 : A} (p : y1 = y2) (q : x = y1) : transport (fun y => x = y) p q = q @ p. Proof. destruct p, q; reflexivity. Defined.
Require Import Basics.Overture Basics.Equivalences Basics.PathGroupoids Basics.Tactics.