Module docstring
{"# Conditionally complete lattices and groups.
"}
{"# Conditionally complete lattices and groups.
"}
ciSup_mul_le_ciSup_mul_ciSup
theorem
[MulLeftMono α] [MulRightMono α] {f g : ι → α} (hf : BddAbove (range f)) (hg : BddAbove (range g)) :
⨆ i, f i * g i ≤ (⨆ i, f i) * ⨆ i, g i
@[to_additive]
lemma ciSup_mul_le_ciSup_mul_ciSup [MulLeftMono α] [MulRightMono α]
{f g : ι → α} (hf : BddAbove (range f)) (hg : BddAbove (range g)) :
⨆ i, f i * g i ≤ (⨆ i, f i) * ⨆ i, g i :=
ciSup_le fun i ↦ mul_le_mul' (le_ciSup hf i) (le_ciSup hg i)
ciInf_mul_ciInf_le_ciInf_mul
theorem
[MulLeftMono α] [MulRightMono α] {f g : ι → α} (hf : BddBelow (range f)) (hg : BddBelow (range g)) :
(⨅ i, f i) * ⨅ i, g i ≤ ⨅ i, f i * g i
@[to_additive]
lemma ciInf_mul_ciInf_le_ciInf_mul [MulLeftMono α] [MulRightMono α]
{f g : ι → α} (hf : BddBelow (range f)) (hg : BddBelow (range g)) :
(⨅ i, f i) * ⨅ i, g i ≤ ⨅ i, f i * g i :=
le_ciInf fun i ↦ mul_le_mul' (ciInf_le hf i) (ciInf_le hg i)
le_mul_ciInf
theorem
[MulLeftMono α] {a : α} {g : α} {h : ι → α} (H : ∀ j, a ≤ g * h j) : a ≤ g * iInf h
@[to_additive]
theorem le_mul_ciInf [MulLeftMono α] {a : α} {g : α} {h : ι → α}
(H : ∀ j, a ≤ g * h j) : a ≤ g * iInf h :=
inv_mul_le_iff_le_mul.mp <| le_ciInf fun _ => inv_mul_le_iff_le_mul.mpr <| H _
mul_ciSup_le
theorem
[MulLeftMono α] {a : α} {g : α} {h : ι → α} (H : ∀ j, g * h j ≤ a) : g * iSup h ≤ a
@[to_additive]
theorem mul_ciSup_le [MulLeftMono α] {a : α} {g : α} {h : ι → α}
(H : ∀ j, g * h j ≤ a) : g * iSup h ≤ a :=
le_mul_ciInf (α := αᵒᵈ) H
le_ciInf_mul
theorem
[MulRightMono α] {a : α} {g : ι → α} {h : α} (H : ∀ i, a ≤ g i * h) : a ≤ iInf g * h
@[to_additive]
theorem le_ciInf_mul [MulRightMono α] {a : α} {g : ι → α}
{h : α} (H : ∀ i, a ≤ g i * h) : a ≤ iInf g * h :=
mul_inv_le_iff_le_mul.mp <| le_ciInf fun _ => mul_inv_le_iff_le_mul.mpr <| H _
ciSup_mul_le
theorem
[MulRightMono α] {a : α} {g : ι → α} {h : α} (H : ∀ i, g i * h ≤ a) : iSup g * h ≤ a
@[to_additive]
theorem ciSup_mul_le [MulRightMono α] {a : α} {g : ι → α}
{h : α} (H : ∀ i, g i * h ≤ a) : iSup g * h ≤ a :=
le_ciInf_mul (α := αᵒᵈ) H
le_ciInf_mul_ciInf
theorem
[MulLeftMono α] [MulRightMono α] {a : α} {g : ι → α} {h : ι' → α} (H : ∀ i j, a ≤ g i * h j) : a ≤ iInf g * iInf h
@[to_additive]
theorem le_ciInf_mul_ciInf [MulLeftMono α] [MulRightMono α] {a : α} {g : ι → α} {h : ι' → α}
(H : ∀ i j, a ≤ g i * h j) : a ≤ iInf g * iInf h :=
le_ciInf_mul fun _ => le_mul_ciInf <| H _
ciSup_mul_ciSup_le
theorem
[MulLeftMono α] [MulRightMono α] {a : α} {g : ι → α} {h : ι' → α} (H : ∀ i j, g i * h j ≤ a) : iSup g * iSup h ≤ a
@[to_additive]
theorem ciSup_mul_ciSup_le [MulLeftMono α] [MulRightMono α] {a : α} {g : ι → α} {h : ι' → α}
(H : ∀ i j, g i * h j ≤ a) : iSup g * iSup h ≤ a :=
ciSup_mul_le fun _ => mul_ciSup_le <| H _