sub f{ my($a,$b)=@_; $a*$b?$a%2&&f($a/2,$b-1)||$b%2&&f($a-1,$b/2):0 } print f(glob<>)?No:Yes