Agda.Utils.Cluster

Create clusters of non-overlapping things.

Documentation

type C = Int

Characteristic identifiers.

cluster :: (a -> NonEmpty C) -> [a] -> [NonEmpty a]

Given a function f :: a -> NonEmpty C which returns a non-empty list of characteristics C of a, partition a list of as into groups such that each element in a group shares at least one characteristic with at least one other element of the group.

cluster' :: [(a, NonEmpty C)] -> [NonEmpty a]

Partition a list of as paired with a non-empty list of characteristics C into groups such that each element in a group shares at least one characteristic with at least one other element of the group.