есть ли способ вызвать две внутренние функции внутри функции - PullRequest
Новая
       9

есть ли способ вызвать две внутренние функции внутри функции

0 голосов
/ 30 октября 2019

У меня есть функция, которая имеет две внутренние функции, которые я хочу вызвать

Я пытался использовать метод замыкания, но я думаю, что я делаю это неправильно 

using JuMP
function scan_maker(A)
    m = JuMP.Model(solver=ClpSolver(PrimalTolerance=1e-3, DualTolerance=1e-3, InfeasibleReturn=1, PresolveType=1))
    # m = Model(solver=GurobiSolver())
    level = size(A, 2)
    v = zeros(Int, level)
    ub = zeros(Int, level)
    lb = zeros(Int, level)

    @variable(m, x[1:level])
    @constraint(m, con, A*x.>=0)

    function setc(c)
        for i = 1:size(A, 1)
            m.linconstr[i].lb = float(c[i])
        end
    end

    function scan()
        i = 1
        init = 1
        while i > 0
            if i >= init
                @objective(m, Max, x[i])
                res = JuMP.solve(m, suppress_warnings=true)
                if res==:Optimal || res==:Unbounded
                    ub[i] = round(Int, getvalue(x[i]))
                    setobjectivesense(m, :Min)
                    res = JuMP.solve(m, suppress_warnings=true)
                    @assert res==:Optimal || res==:Unbounded
                    lb[i] = round(Int, getvalue(x[i]))

                    v[i] = lb[i]
                    init += 1
                else
                    @assert res==:Infeasible
                    i -= 1
                    continue
                end
            elseif v[i] < ub[i]
                v[i] += 1
            else
                setupperbound(x[i], Inf)
                setlowerbound(x[i], -Inf)
                init -= 1
                i -= 1
                continue
            end

            if i >= level
                produce(v)
                continue
            else
                setupperbound(x[i], v[i])
                setlowerbound(x[i], v[i])
                i += 1
            end
        end
    end

    return setc, scan
end

iЯ хочу вызвать setc(c) и scan() как для функции scan_maker, в качестве входной информации используется неквадратная матрица, и есть функция produce(), которую я не знаю, как мне справиться с этим, используя Channel потому что это устарело, когда я называю scan_maker(A) с A не квадратной матрицей, я получаю это: 

 * 2 linear constraints
 * 4 variables
Solver is Clp), getfield(Main, Symbol("##4#6")){Model,Int64,Array{Int64,1},Array{Int64,1},Array{Int64,1},Array{Variable,1}}(Feasibility problem with:
 * 2 linear constraints
 * 4 variables
Solver is Clp, 4, [0, 0, 0, 0], [0, 0, 0, 0], [0, 0, 0, 0], x[i] ∀ i ∈ {1,2,3,4}))```
which doesn't make sense
...