Removed redundant import Data.Map
Used `const` for a constant function