require 'minitest/autorun'
 
A=->x{x.reduce(0.0,:+)/x.size}
F=->q{b,a=q.sort_by{|x|A[x]};a.any?{|x|x<A[a]&&x>A[b]}}
 
describe F do
  def test_truthy_cases
    [
    [[1], [2, 3]],
    [[1, 2, 3], [4, 5, 6]],
    [[3, 4, 5, 6], [2, 3, 4, 5]],
    [[6, 5, 9, 5, 6, 0], [6, 2, 0, 9, 5, 2]],
    [[0, 4], [9, 1, 0, 2, 8, 0, 5, 5, 4, 9]]
    ].each do |arrays|
      assert F[arrays]
    end
  end
 
  def test_falsy_cases
    [
    [[1], [2]],
    [[2, 4], [5]],
    [[1, 5], [2, 3, 4, 5]],
    [[2, 1, 2, 3, 1, 3], [5, 1, 6]],
    [[4, 4, 5, 2, 4, 0], [9, 2, 10, 1, 9, 0]]
    ].each do |arrays|
      refute F[arrays]
    end
  end
end
 

cmVxdWlyZSAnbWluaXRlc3QvYXV0b3J1bicKCkE9LT54e3gucmVkdWNlKDAuMCw6KykveC5zaXplfQpGPS0+cXtiLGE9cS5zb3J0X2J5e3x4fEFbeF19O2EuYW55P3t8eHx4PEFbYV0mJng+QVtiXX19CgpkZXNjcmliZSBGIGRvCiAgZGVmIHRlc3RfdHJ1dGh5X2Nhc2VzCiAgICBbCiAgICBbWzFdLCBbMiwgM11dLAogICAgW1sxLCAyLCAzXSwgWzQsIDUsIDZdXSwKICAgIFtbMywgNCwgNSwgNl0sIFsyLCAzLCA0LCA1XV0sCiAgICBbWzYsIDUsIDksIDUsIDYsIDBdLCBbNiwgMiwgMCwgOSwgNSwgMl1dLAogICAgW1swLCA0XSwgWzksIDEsIDAsIDIsIDgsIDAsIDUsIDUsIDQsIDldXQogICAgXS5lYWNoIGRvIHxhcnJheXN8CiAgICAgIGFzc2VydCBGW2FycmF5c10KICAgIGVuZAogIGVuZAoKICBkZWYgdGVzdF9mYWxzeV9jYXNlcwogICAgWwogICAgW1sxXSwgWzJdXSwKICAgIFtbMiwgNF0sIFs1XV0sCiAgICBbWzEsIDVdLCBbMiwgMywgNCwgNV1dLAogICAgW1syLCAxLCAyLCAzLCAxLCAzXSwgWzUsIDEsIDZdXSwKICAgIFtbNCwgNCwgNSwgMiwgNCwgMF0sIFs5LCAyLCAxMCwgMSwgOSwgMF1dCiAgICBdLmVhY2ggZG8gfGFycmF5c3wKICAgICAgcmVmdXRlIEZbYXJyYXlzXQogICAgZW5kCiAgZW5kCmVuZAo=