gistfile1.coffee

    create_shortage = ->
      shortage = 0

      percents.each (x, i) ->
        if x < 15
          percents[i] = 15
          shortage += 15 - x

      shortage

    spread_shortage = (bigs, shortage) ->
      filler = bigs.sum()

      percents.each (x, i) ->
        return unless x > 15
        percents[i] = x - x/filler*shortage

    while (bigs = percents.findAll (x) -> x > 15).length > 0 && (shortage = create_shortage()) > 0
      spread_shortage(bigs, shortage)