partitionOrders :: Partition -> [Composition]
partitionOrders = map concat . permutations . group
partitionOrders :: Partition -> [Composition]
partitionOrders = map concat . permutations . group
partitionOrders = map concat . permutations . group