refine Fin.ne_of_val_ne (Nat.ne_of_gt ?_)
m n : Nat
i : Fin m
j : Fin n
k : Fin (n - ↑j)
⊢ ¬Fin.rlexProd (Fin.castSucc i) (Fin.castLE (_ : Nat.succ (↑j + (n - ↑j)) ≤ n + 1) (Fin.succ (Fin.natAdd (↑j) k))) =
      Board.pivot i j
m n : Nat
i : Fin m
j : Fin n
k : Fin (n - ↑j)
⊢ ↑(Board.pivot i j) <
    ↑(Fin.rlexProd (Fin.castSucc i) (Fin.castLE (_ : Nat.succ (↑j + (n - ↑j)) ≤ n + 1) (Fin.succ (Fin.natAdd (↑j) k))))