∀ {α : Type u} {instOrd : Ord α} {t : Std.DTreeMap.Internal.Impl α fun x => Unit} [Std.TransOrd α],
  t.WF → ∀ {l : List α}, (↑(Std.DTreeMap.Internal.Impl.Const.insertManyIfNewUnit! t l)).size ≤ t.size + l.length