apis/examples_matlab_control/transport__engine_8m_source.html

함수transportEngine(varargin)


% 인수에서 작업공간 정보 확인

    if나긴 > 0

wsInfo = 슬롯 무료체험control.WorkspaceInfo();

wsInfo.systemDirectory = varargin1;

ws = 슬롯 무료체험control.Workspace(wsInfo);

    그밖에

ws = 슬롯 무료체험control.Workspace();

끝


%가 환경 변수에서 엔진 구성을 읽었습니다.

engine_url = getenv('ENGINE_URL');

    ifisempty(engine_url)

오류('환경 변수 ENGINE_URL이 설정되지 않았습니다');

끝

engine_user = getenv('ENGINE_USER');

    ifisempty(engine_user)

오류('환경 변수 ENGINE_USER가 설정되지 않았습니다');

끝

engine_password = getenv('엔진_비밀번호');

    ifisempty(engine_password)

오류('환경 변수 ENGINE_PASSWORD가 설정되지 않음');

끝

engine_namespace = getenv('ENGINE_NAMESPACE');

    ifisempty(engine_namespace)

오류('환경 변수 ENGINE_NAMESPACE가 설정되지 않았습니다');

끝


    % 세트업 구성 필요for슬롯 무료체험 엔진의 모든 작업

engine_configuration = gams.control.슬롯 무료체험Configuration(엔진_url, 엔진_사용자, ...

엔진_비밀번호,"", 엔진_네임스페이스);


출력 = 슬롯 무료체험control.PrintStream();


runEngineJob1(ws, 엔진_구성, 출력);

runEngineJob2(ws, 엔진_구성, 출력);

runEngineJob3(ws, 엔진_구성, 출력);

끝


함수runEngineJob1(ws, 엔진_구성, 출력)

% a의 데이터로 실행문자열슬롯 무료체험 구문 포함명시적GDX 파일로 내보내기


job = ws.addJobFromString(data());


engine_run_parameters = gams.control.슬롯 무료체험RunParameters();

engine_run_parameters.configuration = 엔진_구성;

engine_run_parameters.output = 출력;


output.println('문자열에서 데이터 실행중...');

job.runEngine(engine_run_parameters);

job.outDB.export('tdata.gdx');

끝


함수runEngineJob2(ws, 엔진_구성, 출력)

% 작업 실행사용 중데이터 포함 파일을 정의하는 옵션의 인스턴스


job = ws.addJobFromString(model());

opt = ws.addOptions();

opt.defines('gdxincname', 'tdata');

opt.setAllModelTypes('익스프레스');


engine_run_parameters = gams.control.슬롯 무료체험RunParameters();

engine_run_parameters.configuration = 엔진_구성;

engine_run_parameters.output = 출력;

engine_run_parameters.options = 선택;

engine_run_parameters.extraModelFiles ="tdata.gdx"};

engine_run_parameters.engineOptions = 컨테이너.맵(...

{'inex_string'}, {'"유형": "포함", "파일": ["*.gdx"]'});


output.println('데이터 포함 파일을 정의하는 옵션 인스턴스를 사용하여 실행 중...');

job.runEngine(engine_run_parameters);


% 변수 검색'x'욥으로부터의 출력 데이터베이스

for x = job.outDB.getVariable('x').기록

fprintf('x(%s,%s): 레벨=%g 한계=%g\n', x1.keys:, x1.level, x1.marginal);

끝

끝


함수 runEngineJob3(ws, 엔진_구성, 출력)

% 2와 동일하지만 암시적 데이터베이스 통신이 있음


job1 = ws.addJobFromString(data());


engine_run_parameters = gams.control.슬롯 무료체험RunParameters();

engine_run_parameters.configuration = 엔진_구성;

engine_run_parameters.output = 출력;


output.println('문자열에서 데이터를 실행하는 중...');

job1.runEngine(engine_run_parameters);


job2 = ws.addJobFromString(model());

cp = ws.addCheckpoint();

opt = ws.addOptions();

opt.defines('gdxincname', job1.outDB.name);

opt.setAllModelTypes('익스프레스');


engine_run_parameters = gams.control.슬롯 무료체험RunParameters();

engine_run_parameters.configuration = 엔진_구성;

engine_run_parameters.output = 출력;

engine_run_parameters.options = 선택;

engine_run_parameters.checkpoint = cp;

engine_run_parameters.databases = job1.outDB;


output.println('체크포인트 암시적 데이터베이스 통신을 사용하여 문자열에서 모델을 실행 중...');

job2.runEngine(engine_run_parameters);


% 검색 변수 'x' 욥에게서's 출력 데이터베이스

for x = job2.outDB.getVariable('x').기록

fprintf('x(%s,%s): 레벨=%g 한계=%g\n', x1.keys:, x1.level, x1.marginal);

끝

끝


함수데이터 = 데이터()

데이터 =

    '세트'

    '  나는 통조림 공장 / 시애틀, 샌디에고 / '

    '  j 마켓 / 뉴욕, 시카고, 토피카 / ;           '

    '매개변수'

    '                                                                 '

    '  a(i) '의 경우 공장 i의 용량

    '                     /시애틀 350'

    '                          샌디에고 600 / '

    '                                                                 '

    '  b(j) '의 경우 시장 j의 수요

    '                     /뉴욕 325'

    '                          시카고 300'

    '                          토피카 275 / ;                   '

    '                                                                 '

    '테이블 d(i,j) 거리(천 마일 단위) '

    '               뉴욕 시카고 토피카 '

    '  시애틀 2.5 1.7 1.8'

    '  샌디에고 2.5 1.8 1.4 ;             '

    '                                                                 '

    '천 마일당 케이스당 달러 단위의 스칼라 f 화물 /90/ '

    '       bmult 수요 승수 /1/;   '};

데이터 = 스프린트f('%s\n', 데이터:);

끝


함수모델 = 모델()

모델 =

    '세트'

    '      나는 통조림 식물 '

    '      j 시장 '

    '                                                                           '

    ' 매개변수 '

    '      a(i) '의 경우 공장 i의 용량

    '      b(j) '의 경우 시장 j의 수요

    '      d(i,j) 거리(천 마일) '

    '                                                                           '

    ' 스칼라 f 운임(1,000마일당 케이스당 달러);                 '

    ' 스칼라 bmult 수요 승수;                                          '

    '                                                                           '

    '$gdxincname $abort가 설정되지 않은 경우 ''제공된 데이터 파일에 대한 포함 파일 이름이 없습니다'''

    '$gdxin %gdxincname% '

    '$load i j a b d f bmult '

    '$gdxin '

    '                                                                           '

    ' 매개변수 c(i,j) 운송 비용(케이스당 수천 달러) ;       '

    '            c(i,j) = f * d(i,j) / 1000 ;                                   '

    '                                                                           '

    ' 변수 '

    '       x(i,j) '의 경우 배송 수량

    '       z 총 운송 비용(단위: 수천 달러);        '

    '                                                                           '

    ' 양수 변수 x ;                                                     '

    '                                                                           '

    ' 방정식 '

    '      비용 정의 목적 함수 '

    '      공급(i) 공장 i의 공급 제한을 준수합니다. '

    '      수요(j)는 시장 j의 수요를 충족시킵니다.                             '

    '                                                                           '

    '  비용 .. z =e= sum((i,j), c(i,j)*x(i,j)) ;                       '

    '                                                                           '

    '  공급(i) .. sum(j, x(i,j)) =l= a(i) ;                               '

    '                                                                           '

    '  수요(j) .. sum(i, x(i,j)) =g= bmult*b(j) ;                         '

    '                                                                           '

    ' 모델 전송 /all/ ;                                                   '

    '                                                                           '

    ' z 를 최소화하는 lp를 사용하여 전송을 해결합니다.                                   '

    '                                                                           '

    '스칼라'

    '     ms 모델 상태 '

    '     ss 해결 상태;                                                      '

    '                                                                           '

    ' x.l, x.m 표시 ;                                                        '};

모델 = 스프린트f('%s\n', 모델:);

끝