Definition isfiniteweqb {X Y : UU} (w : X ≃ Y) (sy : isfinite Y) : isfinite X := hinhfun (finstructweqb w) sy.
Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.MoreFoundations.DecidablePropositions. Require Import UniMath.MoreFoundations.NegativePropositions. Require Import UniMath.MoreFoundations.Subtypes.