rw [←Finset.sum_filter]
case calc_1
s : SelbergSieve
hP : ∀ (p : ℕ), p.Prime → ↑p ≤ s.level → p ∣ s.prodPrimes
hnu : CompletelyMultiplicative s.nu
hnu_nonneg : ∀ (n : ℕ), 0 ≤ s.nu n
hnu_lt : ∀ (p : ℕ), p.Prime → p ∣ s.prodPrimes → s.nu p < 1
⊢ (∑ l ∈ s.prodPrimes.divisors, if ↑l ^ 2 ≤ s.level then s.selbergTerms l else 0) ≥
    ∑ l ∈ Finset.filter (fun l => ↑l ^ 2 ≤ s.level) s.prodPrimes.divisors,
      ∑ m ∈ Finset.filter (fun x => l ∣ x) (l ^ ⌊s.level⌋₊).divisors, s.nu m
case calc_1
s : SelbergSieve
hP : ∀ (p : ℕ), p.Prime → ↑p ≤ s.level → p ∣ s.prodPrimes
hnu : CompletelyMultiplicative s.nu
hnu_nonneg : ∀ (n : ℕ), 0 ≤ s.nu n
hnu_lt : ∀ (p : ℕ), p.Prime → p ∣ s.prodPrimes → s.nu p < 1
⊢ ∑ a ∈ Finset.filter (fun l => ↑l ^ 2 ≤ s.level) s.prodPrimes.divisors, s.selbergTerms a ≥
    ∑ l ∈ Finset.filter (fun l => ↑l ^ 2 ≤ s.level) s.prodPrimes.divisors,
      ∑ m ∈ Finset.filter (fun x => l ∣ x) (l ^ ⌊s.level⌋₊).divisors, s.nu m