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