apis/examples_matlab_control/transport1_8m_source.html

function transport1(varargin)


    % check workspace info from arguments

    if nargin > 0

        wsInfo = gams.control.WorkspaceInfo();

        wsInfo.systemDirectory = varargin{1};

        ws = gams.control.Workspace(wsInfo);

    else

        ws = gams.control.Workspace();

    end


    % create Job 't1' from 'trnsport' model in GAMS Model Libraries

    t1 = ws.addJobFromGamsLib('trnsport');

    % run Job 't1'

    t1.run();


    % retrieve Variable 'x' from Job's output databases

    fprintf('Ran with Default:\n');

    for x = t1.outDB.getVariable('x').records

        fprintf('x(%s,%s): level=%g marginal=%g\n', x{1}.keys{:}, x{1}.level, x{1}.marginal);

    end


    % clear database

    t1.outDB.dispose();


    % create Options 'opt1'

    opt1 = ws.addOptions();

    % set all model types of 'opt1' for 'xpress'

    opt1.setAllModelTypes('xpress');

    % run Job 't1' with Options 'opt1'

    t1.run(opt1);


    % retrieve Variable 'x' from Job's output databases

    fprintf('\nRan with XPRESS:\n');

    for x = t1.outDB.getVariable('x').records

        fprintf('x(%s,%s): level=%g marginal=%g\n', x{1}.keys{:}, x{1}.level, x{1}.marginal);

    end


    % clear option and database

    opt1.dispose();

    t1.outDB.dispose();


    % write file 'xpress.opt' under Workspace's working directory

    fid = fopen(fullfile(ws.workingDirectory, 'xpress.opt'), 'w');

    fprintf(fid, 'algorithm=barrier');

    fclose(fid);


    % create Options 'opt2'

    opt2 = ws.addOptions();

    % set all model types of 'opt2' for 'xpress'

    opt2.setAllModelTypes('xpress');

    % for 'opt2', use 'xpress.opt' as solver's option file

    opt2.optFile = 1;


    % run Job 't2' with Options 'opt2' and capture log into 'transport1_xpress.log'.

    output = gams.control.PrintStream(fullfile(ws.workingDirectory, 'transport1_xpress.log'));

    t1.run(opt2, output);

    output.close();


    % retrieve Variable 'x' from Job's output databases

    fprintf('\nRan with XPRESS with non-default option:\n');

    for x = t1.outDB.getVariable('x').records

        fprintf('x(%s,%s): level=%g marginal=%g\n', x{1}.keys{:}, x{1}.level, x{1}.marginal);

    end


    % clear option and database

    opt2.dispose();

    t1.outDB.dispose();


    % remove working directory

    rmdir(ws.workingDirectory, 's');

end