function

function countSetBits(n)
    local count = 0
    while (n > 0) do
        count = count + (n & 1)
        n = n >> 1
    end

    return count
end