$1 = 0 while($1*$1 <= (H * W) * (H*W)) $2 = $1/W + 1 $3 = $1%W + 1 $1 = $1+1+(A[$1/W + 1,$1%W + 1]-B[$1/W + 1,$1%W + 1]) * 1000000000 end return($2,$3)