Section ArgExtremum.
Context (I : finType) (i0 : I) (P : {pred I}) (F : I -> T) (Pi0 : P i0).
Hypothesis F_comparable : {in P &, forall i j, F i >=< F j}.
End ArgExtremum.
(* monotonicity *)

Lemma leIxl x y z : y <= x -> y `&` z <= x.