rw [h] at hkl
case pos.hnc
s : SelbergSieve
d : ℕ
hdP : d ∣ P
k : ℕ
hk : k ∈ P.divisors
hkd : k ∣ d
l : ℕ
a✝ : l ∣ P
hkl : ¬k ∣ l
h : k = d.gcd l
⊢ False
case pos.hnc
s : SelbergSieve
d : ℕ
hdP : d ∣ P
k : ℕ
hk : k ∈ P.divisors
hkd : k ∣ d
l : ℕ
a✝ : l ∣ P
hkl : ¬d.gcd l ∣ l
h : k = d.gcd l
⊢ False