let N = stdin.ReadLine().ToCharArray() let ans = N |> Array.sortDescending |> fun x -> new string(x) ans |> printfn "%s"