$1 = 0
$2 = 0

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

return($1+1,$2+1)