proposition: Lemma minabstn_to_astn { a b : nat } : ⟦ min a b ⟧%stn -> ⟦ a ⟧%stn.
proof: Proof. apply stnmtostnn, min_le_l. Defined.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.Combinatorics.Maybe UniMath.Combinatorics.StandardFiniteSets UniMath.Algebra.Domains_and_Fields UniMath.Algebra.RigsAndRings