fact: Definition fibseq1g {Y Z : UU} (g : Y -> Z) (z : Z) (y : Y) : fibseqstr (d1g g z y) (hfiberpr1 g z) y := make_fibseqstr _ _ _ _ (isweqezmap1 (hfiberpr1 g z) g z (fibseqg g z) y).
imports: UniMath.Foundations.Preamble