{A : Type} (P : A -> Type) {x y : A} (p : x = y) (u : P x) (v : P y) : u = transport P p^ v <~> transport P p u = v := Build_Equiv _ _ (moveR_transport_p P p u v) _.
Require Import Basics.Overture Basics.Equivalences Basics.PathGroupoids Basics.Tactics.