∀ {α : Type u} {cmp : α → α → Ordering} {δ : Type w} {β : Type v} {t : Std.DTreeMap α (fun x => β) cmp}
  {f : α → β → δ → δ} {init : δ},
  Std.DTreeMap.foldr f init t = List.foldr (fun a b => f a.1 a.2 b) init (Std.DTreeMap.Const.toList t)