my $lo_pos = binary_search(0,$#F,$lo,\&reader,\@F,2);
my $hi_pos = binary_search($lo_pos,$#F,$hi,\&reader,\@F,2);