$10 = H * W / 2 $11 = 0 $15 = H * W $16 = 0 while ($11 < $10) $100 = $100 + A[($11 / W) + 1, ($11 % W) + 1] $101 = $101 + B[($11 / W) + 1, ($11 % W) + 1] $11 = $11 + 1 end if ($100 != $101) $15 = $10 $10 = ($16 + $10) / 2 end if ($100 == $101) $16 = $10 $10 = ($15 + $10) / 2 end while ($21 < $10) $200 = $200 + A[($21 / W) + 1, ($21 % W) + 1] $201 = $201 + B[($21 / W) + 1, ($21 % W) + 1] $21 = $21 + 1 end if ($200 != $201) $15 = $10 $10 = ($16 + $10) / 2 end if ($200 == $201) $16 = $10 $10 = ($15 + $10) / 2 end while ($31 < $10) $300 = $300 + A[($31 / W) + 1, ($31 % W) + 1] $301 = $301 + B[($31 / W) + 1, ($31 % W) + 1] $31 = $31 + 1 end if ($300 != $301) $15 = $10 $10 = ($16 + $10) / 2 end if ($300 == $301) $16 = $10 $10 = ($15 + $10) / 2 end while ($41 < $10) $400 = $400 + A[($41 / W) + 1, ($41 % W) + 1] $401 = $401 + B[($41 / W) + 1, ($41 % W) + 1] $41 = $41 + 1 end if ($400 != $401) $15 = $10 $10 = ($16 + $10) / 2 end if ($400 == $401) $16 = $10 $10 = ($15 + $10) / 2 end while ($51 < $10) $500 = $500 + A[($51 / W) + 1, ($51 % W) + 1] $501 = $501 + B[($51 / W) + 1, ($51 % W) + 1] $51 = $51 + 1 end if ($500 != $501) $15 = $10 $10 = ($16 + $10) / 2 end if ($500 == $501) $16 = $10 $10 = ($15 + $10) / 2 end while ($61 < $10) $600 = $600 + A[($61 / W) + 1, ($61 % W) + 1] $601 = $601 + B[($61 / W) + 1, ($61 % W) + 1] $61 = $61 + 1 end if ($600 != $601) $15 = $10 $10 = ($16 + $10) / 2 end if ($600 == $601) $16 = $10 $10 = ($15 + $10) / 2 end while ($71 < $10) $700 = $700 + A[($71 / W) + 1, ($71 % W) + 1] $701 = $701 + B[($71 / W) + 1, ($71 % W) + 1] $71 = $71 + 1 end if ($700 != $701) $15 = $10 $10 = ($16 + $10) / 2 end if ($700 == $701) $16 = $10 $10 = ($15 + $10) / 2 end return(1 + $16 / W, 1 + $16 % W)