require 'minitest/autorun'

f=->n{r=a=[]
(0...n).map{|i|a<<a=[i]}
r[0]||r}


describe '#f' do
  it 'returns the correct results' do
    assert_equal f[0], []
    assert_equal f[1], [0]
    assert_equal f[2], [0, [1]]
    assert_equal f[6], [0, [1, [2, [3, [4, [5]]]]]]
    assert_equal f[26], [0, [1, [2, [3, [4, [5, [6, [7, [8, [9, [10, [11, [12, [13, [14, [15, [16, [17, [18, [19, [20, [21, [22, [23, [24, [25]]]]]]]]]]]]]]]]]]]]]]]]]]
    assert_equal f[69], [0, [1, [2, [3, [4, [5, [6, [7, [8, [9, [10, [11, [12, [13, [14, [15, [16, [17, [18, [19, [20, [21, [22, [23, [24, [25, [26, [27, [28, [29, [30, [31, [32, [33, [34, [35, [36, [37, [38, [39, [40, [41, [42, [43, [44, [45, [46, [47, [48, [49, [50, [51, [52, [53, [54, [55, [56, [57, [58, [59, [60, [61, [62, [63, [64, [65, [66, [67, [68]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]]
  end
end