Mul Operator smul ge

lemma mulOperator_smul_ge (μ : Measure (Space d)) (c : ℂ) (f : Space d → ℂ) :    c • 𝓜 μ f ≤ 𝓜 μ (c • f) := by  refine le_of_le_graph fun u h ↦ ?_  rw [mem_graph_iff] at *  obtain ⟨⟨v, hv⟩, hvu, hvu'⟩ := h  have hv' : v ∈ (𝓜 μ (c • f)).domain := by    rw [smul_domain, mem_mulOperator_domain_iff] at *    simpa using hv.const_smul c  refine ⟨⟨v, hv'⟩, hvu, ?_⟩  rw [← hvu', ext_iff]  filter_upwards [mulOperator_apply_ae ⟨v, hv⟩, mulOperator_apply_ae ⟨v, hv'⟩,    coeFn_smul c (𝓜 μ f ⟨v, hv⟩)]  simp_all [mul_assoc]