kata.rb

def kata(digits = [], has_pair = false)
  if digits.inject {|sum, digit| sum + digit } == 15
    has_pair ? [digits] : []
  else
    start = (digits.last || 0) + 1
    (start..9).inject([]) do |result, digit|
      result + kata(digits + [digit], has_pair) + kata(digits + [digit, digit], true)
    end
  end
end

p kata