fact: Definition finstructontotal2 {X : UU} (P : X -> UU) (sx : finstruct X) (fs : ∏ x : X, finstruct (P x)) : finstruct (∑ (x : X), P x) := make_finstruct _ (nelstructontotal2 P (λ x : X, finstruct_cardinality (fs x)) sx (λ x : X, fs x)).
imports: UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions UniMath.Combinatorics.StandardFiniteSets UniMath.MoreFoundations.Subtypes