let h' : ∃ i, i ∈ Finset.filter Nat.Prime (Finset.range (n + 1)) ∧ p ∣ i := Prime.exists_mem_finset_dvd (Nat.Prime.prime hp) h
case mp
n p : ℕ
hp : p.Prime
h : p ∣ ∏ p ∈ Finset.filter Nat.Prime (Finset.range (n + 1)), p
⊢ p ≤ n
case mp
n p : ℕ
hp : p.Prime
h : p ∣ ∏ p ∈ Finset.filter Nat.Prime (Finset.range (n + 1)), p
h' : ∃ i ∈ Finset.filter Nat.Prime (Finset.range (n + 1)), p ∣ i := Prime.exists_mem_finset_dvd (Nat.Prime.prime hp) h
⊢ p ≤ n