fact: Definition fibseq2 {X Y Z : UU} (f : X -> Y) (g : Y->Z) (z : Z) (fs : fibseqstr f g z) (y : Y) (x : X) : fibseqstr (d2 f g z fs y x) (d1 f g z fs y) x := make_fibseqstr _ _ _ _ (isweqezmap1 (d1 f g z fs y) f y (fibseq1 f g z fs y) x).
imports: UniMath.Foundations.Preamble