{-# LANGUAGE FlexibleContexts #-} -- only to satisfy the type spec being there

module Alphabetize where

import Data.Array.IO
import Data.List

-- type generated by GHCi
alphabetize :: (Ord e, Ix i, MArray a [e] m) => a i [e] -> m (a i [e])
alphabetize = mapArray sort