You are viewing a single comment's thread. Return to all comments →
I used the same method, but without using "reverse:"
rd :: String -> String -> String rd [] set = set rd (s:str) set | s `elem` set = rd str set | otherwise = rd str (set ++ [s]) main :: IO () main = do str <- getLine putStrLn $ rd str []
Seems like cookies are disabled on this browser, please enable them to open this website
Remove Duplicates
You are viewing a single comment's thread. Return to all comments →
I used the same method, but without using "reverse:"