trim :: String -> String
trim = reverse . dropWhile isSpace . reverse . dropWhile isSpace
trim :: String -> String
trim = reverse . dropWhile isSpace . reverse . dropWhile isSpace
trim = reverse . dropWhile isSpace . reverse . dropWhile isSpace