import           Control.Monad
import           Control.Monad.Fix
import           Data.Bool
import           Data.IORef

main :: IO ()
main = do
  [a, b] <- map (read :: String -> Int) . words <$> getLine
  refB <- newIORef b
  modifyIORef' refB (`div` gcd a b)
  fix $ \loop -> do
    b1 <- readIORef refB
    when (even b1) $ modifyIORef' refB (`div` 2) >> loop
  fix $ \loop -> do
    b2 <- readIORef refB
    when (b2 `mod` 5 == 0) $ modifyIORef' refB (`div` 5) >> loop
  b3 <- readIORef refB
  putStrLn $ bool "No" "Yes" (b3 > 1)