apply Nat.le_of_succ_le_succ
case refine_1.refine_2
α : Type u
lt : α → α → Bool
inst✝ : LawfulLTBRel lt
x : Subarray α
k : Nat
hk : Subarray.size x / 2 ≤ k
⊢ Subarray.size x % 2 ≤ 1
case refine_1.refine_2.a
α : Type u
lt : α → α → Bool
inst✝ : LawfulLTBRel lt
x : Subarray α
k : Nat
hk : Subarray.size x / 2 ≤ k
⊢ Nat.succ (Subarray.size x % 2) ≤ Nat.succ 1