deepcopy

local function deepcopy(src, dest, cache, shallow)
    cache = cache or {}
    cache[src] = dest
    for i, v in pairs(src) do
        if type(v) == "table" and not shallow then
            if not cache[v] then
                dest[i] = {}
                deepcopy(v,dest[i],cache)
            else
                dest[i] = cache[v]
            end
        else
            dest[i] = v
        end
    end
    return dest
end