intro n _
s : Sieve
μPlus : UpperBoundSieve
hμ : ∀ (n : ℕ), δ n ≤ ∑ d ∈ n.divisors, μPlus.μPlus d
⊢ ∀ x ∈ A,
    s.weights x * ∑ d ∈ (P.gcd x).divisors, μPlus.μPlus d =
      ∑ d ∈ P.divisors, if d ∣ x then s.weights x * μPlus.μPlus d else 0
s : Sieve
μPlus : UpperBoundSieve
hμ : ∀ (n : ℕ), δ n ≤ ∑ d ∈ n.divisors, μPlus.μPlus d
n : ℕ
a✝ : n ∈ A
⊢ s.weights n * ∑ d ∈ (P.gcd n).divisors, μPlus.μPlus d =
    ∑ d ∈ P.divisors, if d ∣ n then s.weights n * μPlus.μPlus d else 0