proposition: Lemma le1_clamp x : clamp x <= 1.
proof: Proof. by rewrite le_maxl le_minl lexx ler01 orbT. Qed.
imports: mathcomp(all_ssreflect all_algebra) mathcomp.classical(boolp classical_sets mathcomp_extra) xfinmap ereal reals discrete topology realseq realsum