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