∀ {α : Type u} {β : α → Type v} {t : Std.DTreeMap.Internal.Impl α β} {δ : Type u_1} {f : (a : α) → β a → δ → δ}
  {init : δ}, Std.DTreeMap.Internal.Impl.foldr f init t = List.foldr (fun p acc => f p.fst p.snd acc) init t.toListModel