rw [←Finset.sum_filter]
s : SelbergSieve
C : ℝ
hrem : ∀ d > 0, |s.rem d| ≤ C
⊢ (∑ d ∈ s.prodPrimes.divisors, if ↑d ≤ s.level then 3 ^ ω d * |s.rem d| else 0) ≤ C * s.level * (1 + s.level.log) ^ 3
s : SelbergSieve
C : ℝ
hrem : ∀ d > 0, |s.rem d| ≤ C
⊢ ∑ a ∈ Finset.filter (fun d => ↑d ≤ s.level) s.prodPrimes.divisors, 3 ^ ω a * |s.rem a| ≤
    C * s.level * (1 + s.level.log) ^ 3