fact: Definition transportD_is_transport {A:Type} (B:A->Type) (C:sig B -> Type) (x1 x2:A) (p:x1=x2) (y:B x1) (z:C (x1;y)) : transportD B (fun a b => C (a;b)) p y z = transport C (path_sigma' B p 1) z.
imports: HoTT.Basics Types.Arrow Types.Paths