gcongr with d hd
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| ≤
    ∑ d ∈ Finset.filter (fun d => ↑d ≤ s.level) s.prodPrimes.divisors, 3 ^ ω d * C
case h.h
s : SelbergSieve
C : ℝ
hrem : ∀ d > 0, |s.rem d| ≤ C
d : ℕ
hd : d ∈ Finset.filter (fun d => ↑d ≤ s.level) s.prodPrimes.divisors
⊢ |s.rem d| ≤ C