Lua数独校验：行列宫的标记核对

local function checkRowsCols(g)
    for i = 1, 9 do
        local r, c = {}, {}
        for j = 1, 9 do
            local rv, cv = g[i][j], g[j][i]
            if r[rv] or c[cv] then return false end
            r[rv], c[cv] = true, true
        end
    end
    return true
end

local function checkSudoku(g)
    if not checkRowsCols(g) then return false end
    for bi = 0, 2 do
        for bj = 0, 2 do
            local b = {}
            for i = 1, 3 do
                for j = 1, 3 do
                    local v = g[bi * 3 + i][bj * 3 + j]
                    if b[v] then return false end
                    b[v] = true
                end
            end
        end
    end
    return true
end