kata.rb

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

p kata