fact: Definition weqdnicoprod_compute {n : nat} (j : ⟦S n⟧ ) : weqdnicoprod_provisional n j ~ weqdnicoprod_map j.
imports: UniMath.Foundations.NaturalNumbers UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.DecidablePropositions UniMath.MoreFoundations.NegativePropositions