simp only [inv_one, mul_one, isUnit_one, IsUnit.squarefree, moebius_apply_of_squarefree,
  cardFactors_one, _root_.pow_zero, Int.cast_one, selbergBoundingSum, cast_pow, one_mul,
  coprime_one_right_eq_true, and_true, cast_one]
s : SelbergSieve
⊢ (1⁻¹ * 1 * ↑(μ 1) * S⁻¹ * ∑ m ∈ P.divisors, if (↑1 * ↑m) ^ 2 ≤ y ∧ m.Coprime 1 then g m else 0) = 1
s : SelbergSieve
⊢ ((∑ l ∈ P.divisors, if ↑l ^ 2 ≤ y then g l else 0)⁻¹ * ∑ l ∈ P.divisors, if ↑l ^ 2 ≤ y then g l else 0) = 1