class Array

# File lib/ext/array.rb, line 70
def apply(to)
  map do |m|
    if m.m?
      to.send(m)
    else
      m.s!.walk(to)
    end
  end
end

# File lib/ext/array.rb, line 9
def filled?() !mt? end

# File lib/ext/array.rb, line 104
def hmap(&block)
  each.with_object({}, &block)
end

# File lib/ext/array.rb, line 22
def ll?(method, *args)
  all? { |o| o.send(method, *args) }
end

# File lib/ext/array.rb, line 94
def mall?(op, &block)
  if op
    all? { |item| item.send(op) }
  elsif block
    all? { |item| item.instance_exec(item, &block) }
  else
    all? { |item| item }
  end
end

# File lib/ext/array.rb, line 34
def mavg(&block)
  msum(&block) / size
end

# File lib/ext/array.rb, line 80
def meach(*args, &block)
  if block
    map { |item| instance_exec(item, *args, &block) }
  elsif args.size == 1
    map(&args.first.sym)
  else
    #args.each.with_object({}) do |action, o|
    #  o[action.sym] = map(&action.sym)
    #end
    method = args.shift
    map { |item| item.send(method, *args) }
  end
end

# File lib/ext/array.rb, line 38
def mmid(&sorter)
  sorted = sort(&sorter)
  length.odd? ? sorted[length / 2].f! : (sorted[length/2 - 1].f! + sorted[length/2].f!).f! / 2
end

# File lib/ext/array.rb, line 26
def msum(initial = 0.0, op = :+, &block)
  if block
    inject(initial) { |m, val| m.send(op, block[val]) }
  else
    map(&:f!).inject(initial, op)
  end
end

# File lib/ext/array.rb, line 68
def msym() map(&:sym) end

# File lib/ext/array.rb, line 18
def no?(method, *args)
  none? { |o| o.send(method, *args) }
end

# File lib/ext/array.rb, line 14
def ny?(method, *args)
  any? { |o| o.send(method, *args) }
end

# File lib/ext/array.rb, line 55
def realize!
  empty? ? nil : self
end

# File lib/ext/array.rb, line 59
def return_first(&block)
  returned = nil
  each { |item| break if (returned = block.call(item)) }
  returned
end

# File lib/ext/array.rb, line 47
def sequester!(crush = true)
  if crush
    compact.size <= 1 ? compact.first : self
  else
    size <= 1 ? first : self
  end
end

# File lib/ext/array.rb, line 43
def values()
  self
end