conv at this =>
  rw [Nat.succ_sub_one, Nat.add_comm, Nat.add_mul_div_left _ _ (by decide)]
  lhs; change 0 + i; rw [Nat.zero_add]
case node_right
i✝ j i : Nat
h : Descendant (2 * i + 2) j
a✝ : 2 * i + 2 < j → Descendant (2 * i + 2) ((j - 1) / 2)
hij : i < j
this : Descendant ((2 * i + 2 - 1) / 2) ((j - 1) / 2)
⊢ Descendant i ((j - 1) / 2)
case node_right
i✝ j i : Nat
h : Descendant (2 * i + 2) j
a✝ : 2 * i + 2 < j → Descendant (2 * i + 2) ((j - 1) / 2)
hij : i < j
this : Descendant i ((j - 1) / 2)
⊢ Descendant i ((j - 1) / 2)