1-- {-# LANGUAGE TransformListComp #-}
2module GroupKeyword where
3
4a = map head $ group $ sort [1..100]
5