rw [l1, sub_eq_add_neg, ← neg_div]
n : ℕ
A a✝ b✝ c✝ d u x✝ y t σ' : ℝ
ψ Ψ : ℝ → ℂ
F G : ℂ → ℂ
f : ℕ → ℂ
𝕜 : Type
inst✝ : _root_.RCLike 𝕜
a b c x : ℝ
ha : 0 < a
hΔ : discrim a b c < 0
l1 : a * x ^ 2 + b * x + c = a * (x + b / (2 * a)) ^ 2 - discrim a b c / (4 * a)
l2 : 0 < -discrim a b c
⊢ 0 < a * x ^ 2 + b * x + c
n : ℕ
A a✝ b✝ c✝ d u x✝ y t σ' : ℝ
ψ Ψ : ℝ → ℂ
F G : ℂ → ℂ
f : ℕ → ℂ
𝕜 : Type
inst✝ : _root_.RCLike 𝕜
a b c x : ℝ
ha : 0 < a
hΔ : discrim a b c < 0
l1 : a * x ^ 2 + b * x + c = a * (x + b / (2 * a)) ^ 2 - discrim a b c / (4 * a)
l2 : 0 < -discrim a b c
⊢ 0 < a * (x + b / (2 * a)) ^ 2 + -discrim a b c / (4 * a)