proposition: Lemma isdecincldni ( n : nat ) ( i : ⟦S n⟧ ) : isdecincl ( dni i ).
proof: Proof. intros. intro j. induction ( stn_eq_or_neq i j ) as [eq|ne]. - induction eq. apply ( isdecpropfromneg ( neghfiberdni n i ) ). - exact ( isdecpropfromiscontr (iscontrhfiberdni _ _ _ ne) ). Defined.
imports: UniMath.Foundations.NaturalNumbers UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions