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