removeQuotes = filter (flip notElem quoteMarks)
  where quoteMarks = "\"'"
removeQuotes = filter (flip notElem quoteMarks)
  where quoteMarks = "\"'"
removeQuotes = filter (flip notElem quoteMarks)
  where quoteMarks = "\"'"