a : ℕ
a1 : 1 < a
b : ℤ√↑(Pell.d a1)
b1 : 1 ≤ b
hp : IsPell b
n : ℕ
h : b ≤ ↑n
⊢ { re := ↑n, im := 0 } ≤ pellZd a1 n
a : ℕ
a1 : 1 < a
b : ℤ√↑(Pell.d a1)
b1 : 1 ≤ b
hp : IsPell b
n : ℕ
h : b ≤ ↑n
⊢ ↑n ≤ pellZd a1 n
rw [Zsqrtd.coe_nat_val]
no goals
a : ℕ
a1 : 1 < a
b : ℤ√↑(Pell.d a1)
b1 : 1 ≤ b
hp : IsPell b
n : ℕ
h : b ≤ ↑n
⊢ { re := ↑n, im := 0 } ≤ pellZd a1 n
exact
  Zsqrtd.le_of_le_le (Int.ofNat_le_ofNat_of_le <| le_of_lt <| n_lt_xn _ _)
    (Int.ofNat_zero_le _)