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