fact: Definition replace_dni_first (n : nat) : dni (@firstelement n) = dni_firstelement.
imports: UniMath.Foundations.NaturalNumbers UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions