{A : Type} (P : A -> Type) {x y : A} (p : x = y) (u : P x) (v : P y) (q : transport P p u = v) : moveR_transport_p P p u v (moveL_transport_V P p u v q) = q. Proof. destruct p; reflexivity. Defined.
Require Import Basics.Overture Basics.Equivalences Basics.PathGroupoids Basics.Tactics.