$0 = 0
$3 = 0
while($3 == 0)
	$1 = $0 / W + 1
    $2 = $0 % W + 1
    $0 = $0 + 1
    $3 = A[$1,$2] - B[$1,$2]
end
return($1, $2)