-- http://www.codewars.com/kata/529eef7a9194e0cbc1000255
module Codewars.Anagram where

import Data.List
import Data.Function
import Data.Char

isAnagramOf :: String -> String -> Bool
isAnagramOf = (==) `on` (sort . map toLower)