fact: Definition nelstructonforall {X : UU} {n : nat} (P : X -> UU) (f : X -> nat) (sx : nelstruct n X) (fs : ∏ x : X , nelstruct (f x) (P x)) : nelstruct (stnprod (f ∘ sx)) (∏ x : X , P x) := invweq (weqcomp (weqonsecbase P sx) (weqstnprod (P ∘ sx) (f ∘ sx) (λ i : ⟦ n ⟧, fs (sx i)))).
imports: UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions UniMath.Combinatorics.StandardFiniteSets UniMath.MoreFoundations.Subtypes