($h,$w)=glob<>;
print"Yes\n";
$a=$h*$w;
for$y(1..$h){
	print join($",map{$_+$y&1?$a--:++$b}1..$w),$/;
}