println(scala.io.StdIn.readLine().foldLeft("")((acc:String , x) => if (acc.contains(x)) acc else acc + x))

defmodule Solution do
    def dedupe(input) do
        String.codepoints(input)
        |> Enum.reduce("", fn x, acc ->
            if String.contains?(acc, x) do
                acc
            else  
                acc <> x
            end
        end)
    end
end

input = IO.read(:stdio, :all)

Solution.dedupe(input)
|>IO.puts

removeDuplicates :: String -> String
removeDuplicates string = foldl (\acc char -> if char `elem` acc then acc else acc ++ [char]) [] string

main = do
    line <- getLine
    putStr $ removeDuplicates line