Caesar_Primes.lua

function IsPrime(_int)
    for i = 2, _int ^ 0.5 do
        if _int % i == 0 then
            return false
        end
    end
    return true
end

function GetBelow(_intMax)
    local randInt = 4
    while not IsPrime(randInt) do
        randInt = math.random(2,_intMax)
    end
    return randInt
end

function GetBetween(_intMin,_intMax)
    local randInt = 4
    while not IsPrime(randInt) do
        randInt = math.random(_intMin,_intMax)
    end
    return randInt
end

function GCD2(_intA,_intB)
    if _intB == 0 then
        return _intA
    else
        return GCD2(_intB,_intA%_intB)
    end
end

function GCD3(_intA,_intB,_intC)
    local AB = GCD2(_intA,_intB)
    local AC = GCD2(_intA,_intC)
    local BC = GCD2(_intB,_intC)
    if AB <= AC then
        if AB <= BC then
            return AB
        else
            return BC
        end
    else
        if AC <= BC then
            return AC
        else
            return BC
        end
    end
end