fact: Definition path_path_sigma_uncurried {A : Type} (P : A -> Type) (u v : sig P) (p q : u = v) (rs : {r : p..1 = q..1 & transport (fun x => transport P x u.2 = v.2) r p..2 = q..2}) : p = q.
imports: HoTT.Basics Types.Arrow Types.Paths