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