import Data.Set (Set)
import qualified Data.Set as S

main :: IO ()
main = do
    s <- getLine
    let n  = length s
        n' = length . S.toList . S.fromList $ s
    if n == n'
        then putStrLn "YES"
        else putStrLn "NO"