fact: Definition finite_subset (X : hSet) : UU := ∑ (A : hsubtype X), isfinite (carrier A).
imports: UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions UniMath.Combinatorics.StandardFiniteSets UniMath.MoreFoundations.Subtypes