conv => change (m/2+1).log2' + 1 ≤ (k/2+1).log2' + 1
m : Nat
h_ind : ∀ {n : Nat}, m / 2 + 1 ≤ n → log2' (m / 2 + 1) ≤ log2' n
n : Nat
h : m + 2 ≤ n
k : Nat := n - 2
this : n = k + 2
⊢ recBase2 0 0 (fun x x_1 => x_1 + 1) (m / 2 + 1) + 1 ≤ recBase2 0 0 (fun x x_1 => x_1 + 1) ((n - 2) / 2 + 1) + 1
m : Nat
h_ind : ∀ {n : Nat}, m / 2 + 1 ≤ n → log2' (m / 2 + 1) ≤ log2' n
n : Nat
h : m + 2 ≤ n
k : Nat := n - 2
this : n = k + 2
⊢ log2' (m / 2 + 1) + 1 ≤ log2' (k / 2 + 1) + 1