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