∀ {α : Type u_1} {β : α → Type u_2} (sz : ℕ) (k' : α) (v' : β k') (l' r' : Std.DTreeMap.Internal.Impl α β)
  (hl : (Std.DTreeMap.Internal.Impl.inner sz k' v' l' r').Balanced) (d : Std.DTreeMap.Internal.Impl α β)
  (hd : d.Balanced) (hd₁ : r'.size ≤ d.size) (hd₂ : d.size ≤ r'.size + 1),
  (Std.DTreeMap.Internal.Impl.balanceR k' v' l' d ⋯ ⋯ ⋯).size ≤
    (Std.DTreeMap.Internal.Impl.inner sz k' v' l' r').size + 1