:: [(a, b)] -> [(a, [b])] -is:exact

groupSort :: Ord k => [(k, v)] -> [(k, [v])]

extra Data.List.Extra Extra, verset Verset

A combination of group and sort.

groupSort [(1,'t'),(3,'t'),(2,'e'),(2,'s')] == [(1,"t"),(2,"es"),(3,"t")]
\xs -> map fst (groupSort xs) == sort (nub (map fst xs))
\xs -> concatMap snd (groupSort xs) == map snd (sortOn fst xs)

classifySndByFst :: Ord a => [(a, b)] -> [(a, [b])]

speculate Test.Speculate.Utils