let () = let n = read_line () in Str.split (Str.regexp_string "") n |> List.sort (fun a b -> if a > b then -1 else 1) |> List.fold_left ( ^ ) "" |> print_endline