Lemma min_le_l: ∏ a b : (nat), min a b ≤ a. Proof. intros; unfold min; revert a. induction b as [| b IH]; destruct a ; try reflexivity. apply IH. Defined.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.Combinatorics.Maybe. Require Import UniMath.Combinatorics.StandardFiniteSets. Require Import UniMath.Algebra.Domains_and_Fields. Require Import UniMath.Algebra.RigsAndRings.