{α : Type u} →
  {cmp : α → α → Ordering} →
    {β : Type v} →
      [Std.TransCmp cmp] →
        {ρ : Type u_1} →
          [ForIn Id ρ (α × β)] → Std.ExtDTreeMap α (fun x => β) cmp → ρ → Std.ExtDTreeMap α (fun x => β) cmp