local join
join = function(...)
	f_with((function()
		local _with_0 = a
		_with_0:func()
		return _with_0
	end)())
	f_with((function(...)
		local _with_0 = a
		_with_0:func(...)
		return _with_0
	end)(...))
	f_listcomp((function()
		local _accum_0 = { }
		local _len_0 = 1
		for i = 1, 10 do
			_accum_0[_len_0] = items[i]
			_len_0 = _len_0 + 1
		end
		return _accum_0
	end)())
	f_listcomp((function(...)
		local _accum_0 = { }
		local _len_0 = 1
		for i = 1, 10 do
			_accum_0[_len_0] = items[i](...)
			_len_0 = _len_0 + 1
		end
		return _accum_0
	end)(...))
	f_listcomp((function()
		local _accum_0 = { }
		local _len_0 = 1
		local _list_0 = items
		for _index_0 = 1, #_list_0 do
			local item = _list_0[_index_0]
			_accum_0[_len_0] = item
			_len_0 = _len_0 + 1
		end
		return _accum_0
	end)())
	f_listcomp((function(...)
		local _accum_0 = { }
		local _len_0 = 1
		local _list_0 = items
		for _index_0 = 1, #_list_0 do
			local item = _list_0[_index_0]
			_accum_0[_len_0] = item(...)
			_len_0 = _len_0 + 1
		end
		return _accum_0
	end)(...))
	f_class((function()
		local A
		do
			local _class_0
			local _base_0 = { }
			if _base_0.__index == nil then
				_base_0.__index = _base_0
			end
			_class_0 = setmetatable({
				__init = function() end,
				__base = _base_0,
				__name = "A"
			}, {
				__index = _base_0,
				__call = function(cls, ...)
					local _self_0 = setmetatable({ }, _base_0)
					cls.__init(_self_0, ...)
					return _self_0
				end
			})
			_base_0.__class = _class_0
			local self = _class_0;
			func()
			A = _class_0
			return _class_0
		end
	end)())
	f_class((function(...)
		local A
		do
			local _class_0
			local _base_0 = { }
			if _base_0.__index == nil then
				_base_0.__index = _base_0
			end
			_class_0 = setmetatable({
				__init = function() end,
				__base = _base_0,
				__name = "A"
			}, {
				__index = _base_0,
				__call = function(cls, ...)
					local _self_0 = setmetatable({ }, _base_0)
					cls.__init(_self_0, ...)
					return _self_0
				end
			})
			_base_0.__class = _class_0
			local self = _class_0;
			func(...)
			A = _class_0
			return _class_0
		end
	end)(...))
	f_tblcomp((function()
		local _tbl_0 = { }
		for k, v in pairs(tb) do
			_tbl_0[k] = v
		end
		return _tbl_0
	end)())
	f_tblcomp((function(...)
		local _tbl_0 = { }
		for k, v in pairs(tb) do
			_tbl_0[k] = v(...)
		end
		return _tbl_0
	end)(...))
	f_tblcomp((function()
		local _tbl_0 = { }
		local _list_0 = items
		for _index_0 = 1, #_list_0 do
			local item = _list_0[_index_0]
			_tbl_0[item] = true
		end
		return _tbl_0
	end)())
	f_tblcomp((function(...)
		local _tbl_0 = { }
		local _list_0 = items
		for _index_0 = 1, #_list_0 do
			local item = _list_0[_index_0]
			_tbl_0[item(...)] = true
		end
		return _tbl_0
	end)(...))
	f_do((function()
		return func()
	end)())
	f_do((function(...)
		return func(...)
	end)(...))
	f_while((function()
		local _accum_0 = { }
		local _len_0 = 1
		while false do
			_accum_0[_len_0] = func()
			_len_0 = _len_0 + 1
		end
		return _accum_0
	end)())
	f_while((function(...)
		local _accum_0 = { }
		local _len_0 = 1
		while false do
			_accum_0[_len_0] = func(...)
			_len_0 = _len_0 + 1
		end
		return _accum_0
	end)(...))
	f_if((function()
		if false then
			return func()
		end
	end)())
	f_if((function(...)
		if false then
			return func(...)
		end
	end)(...))
	f_unless((function()
		if not true then
			return func()
		end
	end)())
	f_unless((function(...)
		if not true then
			return func(...)
		end
	end)(...))
	f_switch((function()
		local _exp_0 = x
		if "abc" == _exp_0 then
			return func()
		end
	end)())
	f_switch((function(...)
		local _exp_0 = x
		if "abc" == _exp_0 then
			return func(...)
		end
	end)(...))
	f_eop((function()
		local _obj_0 = func
		if _obj_0 ~= nil then
			return _obj_0()
		end
		return nil
	end)())
	f_eop((function(...)
		local _obj_0 = func
		if _obj_0 ~= nil then
			return _obj_0(...)
		end
		return nil
	end)(...))
	f_colon((function()
		local _base_0 = f()
		local _fn_0 = _base_0.func
		return _fn_0 and function(...)
			return _fn_0(_base_0, ...)
		end
	end)())
	f_colon((function(...)
		local _base_0 = f(...)
		local _fn_0 = _base_0.func
		return _fn_0 and function(...)
			return _fn_0(_base_0, ...)
		end
	end)(...))
	local _
	_ = function()
		local list = {
			1,
			2,
			3,
			4,
			5
		}
		local fn
		fn = function(ok)
			return ok, table.unpack(list)
		end
		return (function(_arg_0, ...)
			local ok = _arg_0
			print(ok, ...)
			local fn_many_args
			fn_many_args = function()
				return 10, nil, 20, nil, 30
			end
			return (function(...)
				print(select("#", ...))
				return print(...)
			end)(fn_many_args())
		end)(fn(true))
	end
	do
		(function(...)
			return print(...)
		end)((function()
			if true then
				return 1, 2
			end
		end)())
	end
	do
		(function(_arg_0, ...)
			local a = _arg_0
			return print(a, select('#', ...))
		end)((function()
			if not true then
				return 1, 2
			end
		end)())
	end
	do
		(function(...)
			return print(...)
		end)((function()
			local _exp_0 = x
			if 1 == _exp_0 then
				local _with_0 = tb
				_with_0.x = 123
				return _with_0
			else
				return tb2
			end
		end)())
	end
	do
		(function(...)
			return print(...)
		end)(1, 2, (function()
			if cond then
				return 3, 4, 5
			end
		end)())
	end
	do
		(function(_arg_0, ...)
			local tb = _arg_0
			return print(...)
		end)({
			name = "abc",
			value = 123
		})
	end
	return nil
end