-- If I ever had a little serious, now may will not miss so much.
clone = function(object)
local lookup_table = {}
local function _copy(object)
if type(object) ~= "table" then
return object
elseif lookup_table[object] then
return lookup_table[object]
end
local new_table = {}
lookup_table[object] = new_table
for index , value in pairs(object) do
new_table[_copy(index)] = _copy(value)
end
return setmetatable(new_table , getmetatable(object))
end
return _copy(object)
end
print_order = function( list ,list_ret)
if #list <= 0 then
print(table.concat(list_ret," "))
return
end
for _,v in ipairs(list) do
local list2 = clone(list)
local list2_ret = clone(list_ret)
if next(list2_ret) and next(list2) and list2_ret[#list2_ret] + list2[_] == 7 or list2_ret[3] and list2_ret[3] ==3 then
else
table.insert(list2_ret,table.remove(list2,_))
print_order(list2,list2_ret)
end
end
end