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