theorem extracted_formal_statement_16.{u_1} {E : Type u_1} [inst : NormedAddCommGroup E] [inst_1 : InnerProductSpace ℝ E]
  [inst_2 : CompleteSpace E] {x0 : E} {f h : E → ℝ} {f' : E → E} {alg : Nesterov_second f h f' x0} {xm : E}
  (minφ : IsMinOn (f + h) univ xm) :
  let φ := fun z => f z + h z;
  (∀ (z : E), φ z = f z + h z) →
    (∀ (k : ℕ+),
        Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
            Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k) ∈
          SubderivAt (Nesterov_second.t f h f' x0 ↑k • h) (Nesterov_second.y f h f' x0 ↑k)) →
      (∀ (w : E) (k : ℕ+),
          Nesterov_second.t f h f' x0 ↑k * h w ≥
            Nesterov_second.t f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k) +
              inner
                (Nesterov_second.γ f h f' x0 ↑k •
                    (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
                  Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
                (w - Nesterov_second.y f h f' x0 ↑k)) →
        (∀ (k : ℕ+),
            h (Nesterov_second.x f h f' x0 ↑k) ≤
              (1 - Nesterov_second.γ f h f' x0 ↑k) * h (Nesterov_second.x f h f' x0 (↑k - 1)) +
                Nesterov_second.γ f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k)) →
          (∀ (k : ℕ), Nesterov_second.t f h f' x0 k / Nesterov_second.γ f h f' x0 k > 0) →
            (∀ (w : E) (k : ℕ+),
                Nesterov_second.γ f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k) ≤
                  Nesterov_second.γ f h f' x0 ↑k * h w -
                    Nesterov_second.γ f h f' x0 ↑k / Nesterov_second.t f h f' x0 ↑k *
                      inner
                        (Nesterov_second.γ f h f' x0 ↑k •
                            (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
                          Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
                        (w - Nesterov_second.y f h f' x0 ↑k)) →
              (∀ (k : ℕ+),
                  f (Nesterov_second.x f h f' x0 ↑k) ≤
                    f (Nesterov_second.z f h f' x0 k) +
                        inner (f' (Nesterov_second.z f h f' x0 k))
                          (Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k) +
                      ↑(Nesterov_second.l f h f' x0) / 2 *
                        ‖Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k‖ ^ 2) →
                (∀ (k : ℕ+),
                    f (Nesterov_second.x f h f' x0 ↑k) ≤
                      f (Nesterov_second.z f h f' x0 k) +
                          inner (f' (Nesterov_second.z f h f' x0 k))
                            (Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k) +
                        1 / (2 * Nesterov_second.t f h f' x0 ↑k) *
                          ‖Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k‖ ^ 2) →
                  (∀ (k : ℕ+),
                      f (Nesterov_second.x f h f' x0 ↑k) ≤
                        f (Nesterov_second.z f h f' x0 k) +
                            inner (f' (Nesterov_second.z f h f' x0 k))
                              ((1 - Nesterov_second.γ f h f' x0 ↑k) • Nesterov_second.x f h f' x0 (↑k - 1) +
                                  Nesterov_second.γ f h f' x0 ↑k • Nesterov_second.y f h f' x0 ↑k -
                                Nesterov_second.z f h f' x0 k) +
                          Nesterov_second.γ f h f' x0 ↑k ^ 2 / (2 * Nesterov_second.t f h f' x0 ↑k) *
                            ‖Nesterov_second.y f h f' x0 ↑k - Nesterov_second.y f h f' x0 (↑k - 1)‖ ^ 2) →
                    (∀ (k : ℕ+),
                        f (Nesterov_second.x f h f' x0 ↑k) ≤
                          (1 - Nesterov_second.γ f h f' x0 ↑k) * f (Nesterov_second.x f h f' x0 (↑k - 1)) +
                              Nesterov_second.γ f h f' x0 ↑k *
                                (f (Nesterov_second.z f h f' x0 k) +
                                  inner (f' (Nesterov_second.z f h f' x0 k))
                                    (Nesterov_second.y f h f' x0 ↑k - Nesterov_second.z f h f' x0 k)) +
                            Nesterov_second.γ f h f' x0 ↑k ^ 2 / (2 * Nesterov_second.t f h f' x0 ↑k) *
                              ‖Nesterov_second.y f h f' x0 ↑k - Nesterov_second.y f h f' x0 (↑k - 1)‖ ^ 2) →
                      (∀ (k : ℕ+),
                          h (Nesterov_second.x f h f' x0 ↑k) ≤
                            (1 - Nesterov_second.γ f h f' x0 ↑k) * h (Nesterov_second.x f h f' x0 (↑k - 1)) +
                                Nesterov_second.γ f h f' x0 ↑k * h xm -
                              Nesterov_second.γ f h f' x0 ↑k / Nesterov_second.t f h f' x0 ↑k *
                                inner
                                  (Nesterov_second.γ f h f' x0 ↑k •
                                      (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
                                    Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
                                  (xm - Nesterov_second.y f h f' x0 ↑k)) →
                        (∀ (k : ℕ+),
                            Nesterov_second.t f h f' x0 (↑k + 1) / Nesterov_second.γ f h f' x0 (↑k + 1) ^ 2 *
                                  (φ (Nesterov_second.x f h f' x0 (↑k + 1)) - φ xm) +
                                1 / 2 * ‖Nesterov_second.y f h f' x0 (↑k + 1) - xm‖ ^ 2 ≤
                              Nesterov_second.t f h f' x0 ↑k / Nesterov_second.γ f h f' x0 ↑k ^ 2 *
                                  (φ (Nesterov_second.x f h f' x0 ↑k) - φ xm) +
                                1 / 2 * ‖Nesterov_second.y f h f' x0 ↑k - xm‖ ^ 2) →
                          (∀ (k : ℕ),
                              Nesterov_second.t f h f' x0 (k + 1) / Nesterov_second.γ f h f' x0 (k + 1) ^ 2 *
                                    (φ (Nesterov_second.x f h f' x0 (k + 1)) - φ xm) +
                                  1 / 2 * ‖Nesterov_second.y f h f' x0 (k + 1) - xm‖ ^ 2 ≤
                                Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 *
                                    (φ (Nesterov_second.x f h f' x0 1) - φ xm) +
                                  1 / 2 * ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2) →
                            φ (Nesterov_second.x f h f' x0 1) - φ xm ≤
                                1 ^ 2 / (2 * Nesterov_second.t f h f' x0 1) *
                                  (‖Nesterov_second.y f h f' x0 0 - xm‖ ^ 2 -
                                    ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2) →
                              Nesterov_second.t f h f' x0 (0 + 1) / Nesterov_second.γ f h f' x0 (0 + 1) ^ 2 > 0 →
                                Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 *
                                        (φ (Nesterov_second.x f h f' x0 1) - φ xm) +
                                      1 / 2 * ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2 ≤
                                    1 / 2 * ‖x0 - xm‖ ^ 2 →
                                  Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 *
                                      (1 ^ 2 / (2 * Nesterov_second.t f h f' x0 1) *
                                        (‖Nesterov_second.y f h f' x0 0 - xm‖ ^ 2 -
                                          ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2)) ≤
                                    1 / 2 * ‖x0 - xm‖ ^ 2 - 1 / 2 * ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2 := sorry

State before:
E : Type u_1
inst✝² : NormedAddCommGroup E
inst✝¹ : InnerProductSpace ℝ E
inst✝ : CompleteSpace E
x0 : E
f h : E → ℝ
f' : E → E
alg : Nesterov_second f h f' x0
xm : E
minφ : IsMinOn (f + h) univ xm
φ : E → ℝ := fun z => f z + h z
φdef : ∀ (z : E), φ z = f z + h z
h1 :
  ∀ (k : ℕ+),
    Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
        Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k) ∈
      SubderivAt (Nesterov_second.t f h f' x0 ↑k • h) (Nesterov_second.y f h f' x0 ↑k)
hieq1 :
  ∀ (w : E) (k : ℕ+),
    Nesterov_second.t f h f' x0 ↑k * h w ≥
      Nesterov_second.t f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k) +
        inner
          (Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
            Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
          (w - Nesterov_second.y f h f' x0 ↑k)
cvxineq :
  ∀ (k : ℕ+),
    h (Nesterov_second.x f h f' x0 ↑k) ≤
      (1 - Nesterov_second.γ f h f' x0 ↑k) * h (Nesterov_second.x f h f' x0 (↑k - 1)) +
        Nesterov_second.γ f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k)
bsc1 : ∀ (k : ℕ), Nesterov_second.t f h f' x0 k / Nesterov_second.γ f h f' x0 k > 0
hieq2 :
  ∀ (w : E) (k : ℕ+),
    Nesterov_second.γ f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k) ≤
      Nesterov_second.γ f h f' x0 ↑k * h w -
        Nesterov_second.γ f h f' x0 ↑k / Nesterov_second.t f h f' x0 ↑k *
          inner
            (Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
              Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
            (w - Nesterov_second.y f h f' x0 ↑k)
hieq4 :
  ∀ (k : ℕ+),
    f (Nesterov_second.x f h f' x0 ↑k) ≤
      f (Nesterov_second.z f h f' x0 k) +
          inner (f' (Nesterov_second.z f h f' x0 k)) (Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k) +
        ↑(Nesterov_second.l f h f' x0) / 2 * ‖Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k‖ ^ 2
hieq5 :
  ∀ (k : ℕ+),
    f (Nesterov_second.x f h f' x0 ↑k) ≤
      f (Nesterov_second.z f h f' x0 k) +
          inner (f' (Nesterov_second.z f h f' x0 k)) (Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k) +
        1 / (2 * Nesterov_second.t f h f' x0 ↑k) * ‖Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k‖ ^ 2
hieq6 :
  ∀ (k : ℕ+),
    f (Nesterov_second.x f h f' x0 ↑k) ≤
      f (Nesterov_second.z f h f' x0 k) +
          inner (f' (Nesterov_second.z f h f' x0 k))
            ((1 - Nesterov_second.γ f h f' x0 ↑k) • Nesterov_second.x f h f' x0 (↑k - 1) +
                Nesterov_second.γ f h f' x0 ↑k • Nesterov_second.y f h f' x0 ↑k -
              Nesterov_second.z f h f' x0 k) +
        Nesterov_second.γ f h f' x0 ↑k ^ 2 / (2 * Nesterov_second.t f h f' x0 ↑k) *
          ‖Nesterov_second.y f h f' x0 ↑k - Nesterov_second.y f h f' x0 (↑k - 1)‖ ^ 2
hieq7 :
  ∀ (k : ℕ+),
    f (Nesterov_second.x f h f' x0 ↑k) ≤
      (1 - Nesterov_second.γ f h f' x0 ↑k) * f (Nesterov_second.x f h f' x0 (↑k - 1)) +
          Nesterov_second.γ f h f' x0 ↑k *
            (f (Nesterov_second.z f h f' x0 k) +
              inner (f' (Nesterov_second.z f h f' x0 k))
                (Nesterov_second.y f h f' x0 ↑k - Nesterov_second.z f h f' x0 k)) +
        Nesterov_second.γ f h f' x0 ↑k ^ 2 / (2 * Nesterov_second.t f h f' x0 ↑k) *
          ‖Nesterov_second.y f h f' x0 ↑k - Nesterov_second.y f h f' x0 (↑k - 1)‖ ^ 2
hieq3 :
  ∀ (k : ℕ+),
    h (Nesterov_second.x f h f' x0 ↑k) ≤
      (1 - Nesterov_second.γ f h f' x0 ↑k) * h (Nesterov_second.x f h f' x0 (↑k - 1)) +
          Nesterov_second.γ f h f' x0 ↑k * h xm -
        Nesterov_second.γ f h f' x0 ↑k / Nesterov_second.t f h f' x0 ↑k *
          inner
            (Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
              Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
            (xm - Nesterov_second.y f h f' x0 ↑k)
decrease :
  ∀ (k : ℕ+),
    Nesterov_second.t f h f' x0 (↑k + 1) / Nesterov_second.γ f h f' x0 (↑k + 1) ^ 2 *
          (φ (Nesterov_second.x f h f' x0 (↑k + 1)) - φ xm) +
        1 / 2 * ‖Nesterov_second.y f h f' x0 (↑k + 1) - xm‖ ^ 2 ≤
      Nesterov_second.t f h f' x0 ↑k / Nesterov_second.γ f h f' x0 ↑k ^ 2 *
          (φ (Nesterov_second.x f h f' x0 ↑k) - φ xm) +
        1 / 2 * ‖Nesterov_second.y f h f' x0 ↑k - xm‖ ^ 2
bound :
  ∀ (k : ℕ),
    Nesterov_second.t f h f' x0 (k + 1) / Nesterov_second.γ f h f' x0 (k + 1) ^ 2 *
          (φ (Nesterov_second.x f h f' x0 (k + 1)) - φ xm) +
        1 / 2 * ‖Nesterov_second.y f h f' x0 (k + 1) - xm‖ ^ 2 ≤
      Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 * (φ (Nesterov_second.x f h f' x0 1) - φ xm) +
        1 / 2 * ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2
k : ℕ
hieqmajor :
  φ (Nesterov_second.x f h f' x0 1) - φ xm ≤
    1 ^ 2 / (2 * Nesterov_second.t f h f' x0 1) *
      (‖Nesterov_second.y f h f' x0 0 - xm‖ ^ 2 - ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2)
ax : Nesterov_second.t f h f' x0 (0 + 1) / Nesterov_second.γ f h f' x0 (0 + 1) ^ 2 > 0
⊢ Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 * (φ (Nesterov_second.x f h f' x0 1) - φ xm) +
      1 / 2 * ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2 ≤
    1 / 2 * ‖x0 - xm‖ ^ 2

Tactic: rw [zero_add] at ax
    have ieq := (mul_le_mul_iff_of_pos_left ax).mpr hieqmajor
    apply (add_le_add_iff_right (-(1 / 2 * ‖alg.y 1 - xm‖ ^ 2))).mp
    rw [← zero_sub, add_sub, add_sub, add_zero, add_zero, ← add_sub, sub_self, add_zero]
    apply le_trans ieq

State after:
[E : Type u_1
 inst✝² : NormedAddCommGroup E
 inst✝¹ : InnerProductSpace ℝ E
 inst✝ : CompleteSpace E
 x0 : E
 f h : E → ℝ
 f' : E → E
 alg : Nesterov_second f h f' x0
 xm : E
 minφ : IsMinOn (f + h) univ xm
 φ : E → ℝ := fun z => f z + h z
 φdef : ∀ (z : E), φ z = f z + h z
 h1 :
   ∀ (k : ℕ+),
     Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
         Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k) ∈
       SubderivAt (Nesterov_second.t f h f' x0 ↑k • h) (Nesterov_second.y f h f' x0 ↑k)
 hieq1 :
   ∀ (w : E) (k : ℕ+),
     Nesterov_second.t f h f' x0 ↑k * h w ≥
       Nesterov_second.t f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k) +
         inner
           (Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
             Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
           (w - Nesterov_second.y f h f' x0 ↑k)
 cvxineq :
   ∀ (k : ℕ+),
     h (Nesterov_second.x f h f' x0 ↑k) ≤
       (1 - Nesterov_second.γ f h f' x0 ↑k) * h (Nesterov_second.x f h f' x0 (↑k - 1)) +
         Nesterov_second.γ f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k)
 bsc1 : ∀ (k : ℕ), Nesterov_second.t f h f' x0 k / Nesterov_second.γ f h f' x0 k > 0
 hieq2 :
   ∀ (w : E) (k : ℕ+),
     Nesterov_second.γ f h f' x0 ↑k * h (Nesterov_second.y f h f' x0 ↑k) ≤
       Nesterov_second.γ f h f' x0 ↑k * h w -
         Nesterov_second.γ f h f' x0 ↑k / Nesterov_second.t f h f' x0 ↑k *
           inner
             (Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
               Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
             (w - Nesterov_second.y f h f' x0 ↑k)
 hieq4 :
   ∀ (k : ℕ+),
     f (Nesterov_second.x f h f' x0 ↑k) ≤
       f (Nesterov_second.z f h f' x0 k) +
           inner (f' (Nesterov_second.z f h f' x0 k)) (Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k) +
         ↑(Nesterov_second.l f h f' x0) / 2 * ‖Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k‖ ^ 2
 hieq5 :
   ∀ (k : ℕ+),
     f (Nesterov_second.x f h f' x0 ↑k) ≤
       f (Nesterov_second.z f h f' x0 k) +
           inner (f' (Nesterov_second.z f h f' x0 k)) (Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k) +
         1 / (2 * Nesterov_second.t f h f' x0 ↑k) * ‖Nesterov_second.x f h f' x0 ↑k - Nesterov_second.z f h f' x0 k‖ ^ 2
 hieq6 :
   ∀ (k : ℕ+),
     f (Nesterov_second.x f h f' x0 ↑k) ≤
       f (Nesterov_second.z f h f' x0 k) +
           inner (f' (Nesterov_second.z f h f' x0 k))
             ((1 - Nesterov_second.γ f h f' x0 ↑k) • Nesterov_second.x f h f' x0 (↑k - 1) +
                 Nesterov_second.γ f h f' x0 ↑k • Nesterov_second.y f h f' x0 ↑k -
               Nesterov_second.z f h f' x0 k) +
         Nesterov_second.γ f h f' x0 ↑k ^ 2 / (2 * Nesterov_second.t f h f' x0 ↑k) *
           ‖Nesterov_second.y f h f' x0 ↑k - Nesterov_second.y f h f' x0 (↑k - 1)‖ ^ 2
 hieq7 :
   ∀ (k : ℕ+),
     f (Nesterov_second.x f h f' x0 ↑k) ≤
       (1 - Nesterov_second.γ f h f' x0 ↑k) * f (Nesterov_second.x f h f' x0 (↑k - 1)) +
           Nesterov_second.γ f h f' x0 ↑k *
             (f (Nesterov_second.z f h f' x0 k) +
               inner (f' (Nesterov_second.z f h f' x0 k))
                 (Nesterov_second.y f h f' x0 ↑k - Nesterov_second.z f h f' x0 k)) +
         Nesterov_second.γ f h f' x0 ↑k ^ 2 / (2 * Nesterov_second.t f h f' x0 ↑k) *
           ‖Nesterov_second.y f h f' x0 ↑k - Nesterov_second.y f h f' x0 (↑k - 1)‖ ^ 2
 hieq3 :
   ∀ (k : ℕ+),
     h (Nesterov_second.x f h f' x0 ↑k) ≤
       (1 - Nesterov_second.γ f h f' x0 ↑k) * h (Nesterov_second.x f h f' x0 (↑k - 1)) +
           Nesterov_second.γ f h f' x0 ↑k * h xm -
         Nesterov_second.γ f h f' x0 ↑k / Nesterov_second.t f h f' x0 ↑k *
           inner
             (Nesterov_second.γ f h f' x0 ↑k • (Nesterov_second.y f h f' x0 (↑k - 1) - Nesterov_second.y f h f' x0 ↑k) -
               Nesterov_second.t f h f' x0 ↑k • f' (Nesterov_second.z f h f' x0 k))
             (xm - Nesterov_second.y f h f' x0 ↑k)
 decrease :
   ∀ (k : ℕ+),
     Nesterov_second.t f h f' x0 (↑k + 1) / Nesterov_second.γ f h f' x0 (↑k + 1) ^ 2 *
           (φ (Nesterov_second.x f h f' x0 (↑k + 1)) - φ xm) +
         1 / 2 * ‖Nesterov_second.y f h f' x0 (↑k + 1) - xm‖ ^ 2 ≤
       Nesterov_second.t f h f' x0 ↑k / Nesterov_second.γ f h f' x0 ↑k ^ 2 *
           (φ (Nesterov_second.x f h f' x0 ↑k) - φ xm) +
         1 / 2 * ‖Nesterov_second.y f h f' x0 ↑k - xm‖ ^ 2
 bound :
   ∀ (k : ℕ),
     Nesterov_second.t f h f' x0 (k + 1) / Nesterov_second.γ f h f' x0 (k + 1) ^ 2 *
           (φ (Nesterov_second.x f h f' x0 (k + 1)) - φ xm) +
         1 / 2 * ‖Nesterov_second.y f h f' x0 (k + 1) - xm‖ ^ 2 ≤
       Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 * (φ (Nesterov_second.x f h f' x0 1) - φ xm) +
         1 / 2 * ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2
 k : ℕ
 hieqmajor :
   φ (Nesterov_second.x f h f' x0 1) - φ xm ≤
     1 ^ 2 / (2 * Nesterov_second.t f h f' x0 1) *
       (‖Nesterov_second.y f h f' x0 0 - xm‖ ^ 2 - ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2)
 ax : Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 > 0
 ieq :
   Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 * (φ (Nesterov_second.x f h f' x0 1) - φ xm) ≤
     Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 *
       (1 ^ 2 / (2 * Nesterov_second.t f h f' x0 1) *
         (‖Nesterov_second.y f h f' x0 0 - xm‖ ^ 2 - ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2))
 ⊢ Nesterov_second.t f h f' x0 1 / Nesterov_second.γ f h f' x0 1 ^ 2 *
       (1 ^ 2 / (2 * Nesterov_second.t f h f' x0 1) *
         (‖Nesterov_second.y f h f' x0 0 - xm‖ ^ 2 - ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2)) ≤
     1 / 2 * ‖x0 - xm‖ ^ 2 - 1 / 2 * ‖Nesterov_second.y f h f' x0 1 - xm‖ ^ 2]

Relevant lemmas:
mul_le_mul_iff_of_pos_left : ∀ {α : Type u_3} {a b c : α} [inst : Mul α] [inst_3 : Zero α] [inst_4 : Preorder α]
  [inst_5 : PosMulMono α] [inst_6 : PosMulReflectLE α], 0 < a → (a * b ≤ a * c ↔ b ≤ c)
zero_add : ∀ {M : Type u} [inst : AddZeroClass M] (a : M), 0 + a = a
sub_self : ∀ {G : Type u_1} [inst : AddGroup G] (a : G), a - a = 0
zero_sub : ∀ {G : Type u_1} [inst : SubNegMonoid G] (a : G), 0 - a = -a
le_trans : ∀ {α : Type u_1} [inst : Preorder α] {a b c : α}, a ≤ b → b ≤ c → a ≤ c
add_zero : ∀ {M : Type u} [inst : AddZeroClass M] (a : M), a + 0 = a
add_le_add_iff_right : ∀ {α : Type u_1} [inst : Add α] [inst_3 : LE α] [inst_4 : AddRightMono α]
  [inst_5 : AddRightReflectLE α] (a : α) {b c : α}, b + a ≤ c + a ↔ b ≤ c