为什么 scalaz 中没有 TrieMap 的 Semigroup 实例

Question

虽然我可以做到

Map("a" -> 1) |+| Map("a" -> 2)

好像不支持

TrieMap("a" -> 1) |+| TrieMap("a" -> 2)

为什么？

Answer 1

Scalaz 并未提供构成半群的所有可能的类型+操作组合，但您可以轻松实现它，例如使用以下 implicit:

import scala.collection.concurrent.TrieMap
import scalaz._, Scalaz._

implicit def trieMapSemigroup[K: BuildKeyConstraint, V: Semigroup]: Semigroup[TrieMap[K, V]] =
  new Semigroup[TrieMap[K, V]] {
    def append(m1: TrieMap[K, V], m2: => TrieMap[K, V]) =
      (m1 /: m2) { case (res, (k, v)) =>
        res += (k -> res.get(k).cata(Semigroup[V].append(_, v), v))
      }
  }

如你所料：

scala> TrieMap("a" -> 1) |+| TrieMap("a" -> 2)
res: TrieMap(a -> 3)

当然，这将适用于在 scalaz 中定义的每个值作为半群。

幺半群呢？

如果您想要 implicit 的优化版本也可以用作 Monoid：

  implicit def trieMapMonoid[K: BuildKeyConstraint, V: Semigroup]: Monoid[TrieMap[K, V]] = new Monoid[TrieMap[K, V]] {
    def zero = TrieMap.empty[K, V]

    def append(m1: TrieMap[K, V], m2: => TrieMap[K, V]) = {
      val m2Instance: TrieMap[K, V] = m2
      val (from, to, semigroup) = {
        if (m1.size > m2Instance.size) (m2Instance, m1, Semigroup[V].append(_: V, _: V))
        else (m1, m2Instance, (Semigroup[V].append(_: V, _: V)).flip)
      }
      from.foldLeft(to) {
        case (res, (k, v)) => res += (k -> res.get(k).map(semigroup(_, v)).getOrElse(v))
      }
    }
  }

(代码不要脸改编自scalaz/std/Map.scala)

为什么 scalaz 中没有 TrieMap 的 Semigroup 实例

Why there is no Semigroup instance for TrieMap in scalaz

scala

scalaz

semigroup

幺半群呢？