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