(defun main () (let ((a (read)) (b (read))) (let ((g (gcd a b))) (let ((a (/ a g)) (b (/ b g))) (if (and (/= b 1) (not (zerop (mod b 2))) (not (zerop (mod b 5)))) (princ "Yes") (princ "No"))))) (fresh-line)) (main)