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