open System let solve (msg: string) = msg.ToCharArray() |> Array.countBy id |> Array.forall(fun (_, x) -> x = 1) |> function | true -> "YES" | _ -> "NO" let S = Console.ReadLine() solve S |> Console.WriteLine