Agda.Utils.Cluster

Create clusters of non-overlapping things.

Documentation

type C = Int

Characteristic identifiers.

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

Given a function f :: a -> NonemptyList 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, NonemptyList C)] -> [NonemptyList 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.