have hp := Nat.Prime.one_lt hp
n p : ℕ
hp : Nat.Prime p
hnp✝ : 2 * n < p ^ 2
hnp : 2 * n ≤ p ^ 2 - 1
⊢ Nat.log p (p ^ 2 - 1) < Nat.succ 1
n p : ℕ
hp✝ : Nat.Prime p
hnp✝ : 2 * n < p ^ 2
hnp : 2 * n ≤ p ^ 2 - 1
hp : 1 < p
⊢ Nat.log p (p ^ 2 - 1) < Nat.succ 1