SortedMap k (Maybe v) -> SortedMap k v 怎么写?

How to write SortedMap k (Maybe v) -> SortedMap k v?

有没有简单的方法从 SortedMap k (Maybe v)SortedMap k v 而无需列出并返回?不应该删除任何东西,只应该保留。

我不这么认为,因为 SortedMap 不公开其构造函数(它只是 export 顶级定义)。从 API 的角度来看,似乎转换为列表并返回是可行的方法。

export
data SortedMap : Type -> Type -> Type where
  Empty : Ord k => SortedMap k v
  M : (o : Ord k) => (n:Nat) -> Tree n k v o -> SortedMap k v