Definition isfiniteempty2 {X : UU} (nx : neg X) : isfinite X := hinhpr (finstructonempty2 nx).
Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.MoreFoundations.DecidablePropositions. Require Import UniMath.MoreFoundations.NegativePropositions. Require Import UniMath.MoreFoundations.Subtypes.