fact: Definition dpath_path_lr {A : Type} {x1 x2 : A} (p : x1 = x2) (q : x1 = x1) (r : x2 = x2) : q @ p = p @ r <~> transport (fun x => x = x) p q = r.
imports: Basics.Overture Basics.Equivalences Basics.PathGroupoids Basics.Tactics