fact: Definition finstructoncompl {X : UU} (x : X) (sx : finstruct X) : finstruct (compl X x).
imports: UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions UniMath.Combinatorics.StandardFiniteSets UniMath.MoreFoundations.Subtypes