$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)