How do you remove accents from a string in Haskell?

I would like a function to remove accents from a string. Example input/output:

regardé -> regarde
fête    -> fete