local hi do local _accum_0 = { } local _len_0 = 1 for _, x in ipairs({ 1, 2, 3, 4 }) do _accum_0[_len_0] = x * 2 _len_0 = _len_0 + 1 end hi = _accum_0 end local items = { 1, 2, 3, 4, 5, 6 } for z in ipairs(items) do if z > 4 then local _ = z end end local rad do local _accum_0 = { } local _len_0 = 1 for a in ipairs({ 1, 2, 3, 4, 5, 6 }) do if good_number(a) then _accum_0[_len_0] = { a } _len_0 = _len_0 + 1 end end rad = _accum_0 end for z in items do for j in list do if z > 4 then local _ = z end end end require("util") local dump dump = function(x) return print(util.dump(x)) end local range range = function(count) local i = 0 return coroutine.wrap(function() while i < count do coroutine.yield(i) i = i + 1 end end) end dump((function() local _accum_0 = { } local _len_0 = 1 for x in range(10) do _accum_0[_len_0] = x _len_0 = _len_0 + 1 end return _accum_0 end)()) dump((function() local _accum_0 = { } local _len_0 = 1 for x in range(5) do if x > 2 then for y in range(5) do _accum_0[_len_0] = { x, y } _len_0 = _len_0 + 1 end end end return _accum_0 end)()) local things do local _accum_0 = { } local _len_0 = 1 for x in range(10) do if x > 5 then for y in range(10) do if y > 7 then _accum_0[_len_0] = x + y _len_0 = _len_0 + 1 end end end end things = _accum_0 end for x in ipairs({ 1, 2, 4 }) do for y in ipairs({ 1, 2, 3 }) do if x ~= 2 then print(x, y) end end end for x in items do print("hello", x) end for x in x do local _ = x end local x do local _accum_0 = { } local _len_0 = 1 for x in x do _accum_0[_len_0] = x _len_0 = _len_0 + 1 end x = _accum_0 end for x in ipairs({ 1, 2, 4 }) do for y in ipairs({ 1, 2, 3 }) do if x ~= 2 then print(x, y) end end end local double do local _accum_0 = { } local _len_0 = 1 for _index_0 = 1, #items do x = items[_index_0] _accum_0[_len_0] = x * 2 _len_0 = _len_0 + 1 end double = _accum_0 end for _index_0 = 1, #double do x = double[_index_0] print(x) end local cut do local _accum_0 = { } local _len_0 = 1 for _index_0 = 1, #items do x = items[_index_0] if x > 3 then _accum_0[_len_0] = x _len_0 = _len_0 + 1 end end cut = _accum_0 end local hello do local _accum_0 = { } local _len_0 = 1 for _index_0 = 1, #items do x = items[_index_0] for _index_1 = 1, #items do local y = items[_index_1] _accum_0[_len_0] = x + y _len_0 = _len_0 + 1 end end hello = _accum_0 end for _index_0 = 1, #hello do local z = hello[_index_0] print(z) end x = { 1, 2, 3, 4, 5, 6, 7 } local _max_0 = -5 for _index_0 = 2, _max_0 < 0 and #x + _max_0 or _max_0, 2 do local y = x[_index_0] print(y) end local _max_1 = 3 for _index_0 = 1, _max_1 < 0 and #x + _max_1 or _max_1 do local y = x[_index_0] print(y) end for _index_0 = 2, #x do local y = x[_index_0] print(y) end for _index_0 = 1, #x, 2 do local y = x[_index_0] print(y) end for _index_0 = 2, #x, 2 do local y = x[_index_0] print(y) end local a, b, c = 1, 5, 2 local _max_2 = b for _index_0 = a, _max_2 < 0 and #x + _max_2 or _max_2, c do local y = x[_index_0] print(y) end local normal normal = function(hello) local _accum_0 = { } local _len_0 = 1 for x in yeah do _accum_0[_len_0] = x _len_0 = _len_0 + 1 end return _accum_0 end local test = x(1, 2, 3, 4, 5) for _index_0 = 1, #test do local thing = test[_index_0] print(thing) end return function() local _list_0 = rows for _index_0 = 1, #_list_0 do local row = _list_0[_index_0] a = b end end