fact: Definition Wtype (A: UU) (B: ∏ x: A, UU): UU := ∑ (U: UU) (w_sup: ∏ (x : A) (f : B x → U), U) (w_ind: ∏ (P : U → UU) (e_s : ∏ (x: A) (f: B x → U) (IH: ∏ u: B x, P (f u)), P (w_sup x f)) (w: U), P w), (∏ (P : U → UU) (e_s : ∏ (x: A) (f: B x → U) (IH: ∏ u: B x, P (f u)), P (w_sup x f)) (x : A) (f : B x → U) , w_ind P e_s (w_sup x f) = e_s x f (λ u, w_ind P e_s (f u))).
imports: UniMath.Foundations.All UniMath.MoreFoundations.Notations UniMath.MoreFoundations.PartA