trim :: String -> String
trim string = dropWhile isSpace $ reverse $ dropWhile isSpace $ reverse string
trim :: String -> String
trim string = dropWhile isSpace $ reverse $ dropWhile isSpace $ reverse string
trim string = dropWhile isSpace $ reverse $ dropWhile isSpace $ reverse string