fact: Definition isfinitedirprod {X Y : UU} (sx : isfinite X) (sy : isfinite Y) : isfinite (X × Y) := hinhfun2 finstructondirprod sx sy.
imports: UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions UniMath.Combinatorics.StandardFiniteSets UniMath.MoreFoundations.Subtypes