main :: IO ()
main = do
    s <- getLine
    putStrLn (if isConstList s then "No" else "Yes")

isConstList :: Eq a => [a] -> Bool
isConstList (x:(y:ys)) = x == y && isConstList (y:ys)
isConstList _ = True