-- O(n^2)
check :: String -> Bool
check [] = True
check (x:xs)
  | l == 0    = check xs
  | otherwise = False
  where l = length $ filter (== x) xs

main :: IO ()
main = do
  str <- getLine
  if check str
    then putStrLn "yes"
    else putStrLn "no"