$n=<>;
$h[$_]=1 for @a=map oct"b$_",<>;
if(!$h[0]|!$h[2**$n-1]){
	print"No";exit;
}
for$a(@a){
	for$b(@a){
		if(!$h[$a&$b]|!$h[$a|$b]){
			print"No";exit;
		}
	}
}
print"Yes";