import           Control.Monad
import           Control.Applicative
import           Data.List

main :: IO ()
main = do
  s <- group . sort <$> getLine
  putStrLn $ if any (/= 1) (map length s) then "no" else "yes"