apis/examples_matlab_control/alias_8m_source.html

함수별칭(varargin)


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

    if나긴 > 0

wsInfo = 크레이지 슬롯control.WorkspaceInfo();

wsInfo.systemDirectory = varargin1;

ws = 크레이지 슬롯control.Workspace(wsInfo);

    그밖에

ws = 크레이지 슬롯control.Workspace();

끝


데이터 =

    'i / i1*i3 /' 설정

    '    j / j1*j3 /'

    '   ij / #i:#j /'

    '별칭 (i,ii), (j,jj), (ij,iijj);'

    '매개변수'

    '    a(i) / #i 1 /, 크레이지 슬롯(ii) / #ii 2 /;'};

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


gdxdump1 =

    '$onempty'

    ''

    '설정 i(*) /'

    '''i1'', '

'''i2'', '

'''i3''/;'

''

'j(*) 설정 /'

'''j1'', '

'''j2'', '

'''j3''/;'

''

'ij(*,*) 설정 /'

'''i1''.''j1'', '

'''i2''.''j2'', '

'''i3''.''j3''/;'

''

'별칭 (ii, i);'

''

'별칭(jj, j);'

''

'별칭(iijj, ij);'

''

'매개변수 a(i) /'

'''i1'' 1, '

'''i2'' 1, '

'''i3''1 /;'

''

'매개변수 크레이지 슬롯(ii) /'

'''i1'' 2, '

'''i2'' 2, '

'''i3''2 /;'

''

'$offempty'

''};

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


gdxdump2 =

'$oneempty'

''

'설정 i(*) /'

'''i1'', '

'''i2'', '

'''i3''/;'

''

'매개변수 크레이지 슬롯(i) /'

'''i1'' 2, '

'''i2'' 2, '

'''i3''2 /;'

''

'$offempty'

''};

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


% 별칭을 포함하는 초기 데이터 생성

% OO API는 별칭에 대해 알지 못하며 이를 세트로 검색합니다.

j1 = ws.addJobFromString(데이터);

j1.run();


checkAliasLogic('j1.outDB', j1.outDB);


j1.outDB.export('outDB.gdx');

assert(SameGdxDump(ws, 'outDB.gdx', gdxdump1), 'gdxdump outDB.gdx의 예상치 못한 결과');


% 복사 생성자는 별칭 및 기타를 보존해야 합니다.

db = ws.addDatabase(j1.outDB);

checkAliasLogic('db', db);

db.export('db.gdx');

assert(SameGdxDump(ws, 'db.gdx', gdxdump1), 'gdxdump db.gdx의 예상치 못한 결과');


db2 = ws.addDatabase();

ii = db2.addSet(db.getSet('ii').이름, db.getSet('ii').text, '*');

db.getSet('ii').copySymbol(ii);


aaOriginal = db.getParameter('아아');

크레이지 슬롯 = db2.addParameter(db.getParameter('아아').이름, db.getParameter('아아').text, ii);

aaOriginal.copySymbol(크레이지 슬롯);

db2.export('db2.gdx');


assert(SameGdxDump(ws, 'db2.gdx', gdxdump2), 'gdxdump db2.gdx의 예상치 못한 결과');


% 도메인이 별칭인 경우 도메인은 별칭 세트를 반환해야 합니다.

% 그러나 getDomainsAsStrings는 별칭 이름을 반환해야 합니다.

assert(isa(aaOriginal.domains1, '설정'), '도메인설정세트여야 합니다');

assert(strcmp(aaOriginal.domains1.name, 'i'), '도메인설정원본이어야 합니다설정');

assert(strcmp(aaOriginal.domainsAsStrings1, 'ii'), '도메인은문자열별칭 이름이어야 합니다');

끝


함수 checkAliasLogic(접두사, aliasDB)

% 기호 수 확인

assert(aliasDB.numberOfSymbols == 5, '%s aliasDB에는 NrSymbols=5: i,j,ij,a,크레이지 슬롯가 있어야 합니다.', 접두사);

assert(numel(aliasDB.symbols) == 5, '%s aliasDB에는 5개의 기호가 있습니다: i,j,ij,a,크레이지 슬롯.', 접두사);


% 별칭 세트를 검색할 수 있는지 확인하세요

assert(strcmp(aliasDB.getSet('ii').이름, 'i'), '%s 우리는 해야 합니다얻기 세트물어볼 때for별칭 ii.', 접두사);

assert(strcmp(aliasDB.getSet('jj').이름, 'j'), '%s 우리는 해야 합니다얻기 세트j 물을 때for별칭 jj.', 접두사);

assert(strcmp(aliasDB.getSet('iijj').이름, 'ij'), '%s 우리는 해야 합니다얻기 설정ij 물을 때for별명 iijj.', 접두사);


% 도메인 로직 확인

assert(aliasDB.checkDomains(), '%s 도메인 확인은 다음과 같아야 합니다.참', 접두사);

도메인 = aliasDB.getParameter('아아').도메인;

assert(isa(도메인1, '크레이지 슬롯control.Set'), '크레이지 슬롯의 %s 도메인[0]은(는)세트', 접두사);

assert(strcmp(도메인1.이름, 'i'), '크레이지 슬롯의 %s 도메인[0]은 i를 가리켜야 합니다.', 접두사);


aliasDB.getSet('ii').deleteRecord('i1');

assert(~aliasDB.checkDomains(), '%s 도메인 확인은 다음과 같아야 합니다.거짓i1 제거 후', 접두사);

aliasDB.getSet('ii').addRecord('i1');

assert(aliasDB.checkDomains(), '%s 도메인 확인은 다음과 같아야 합니다.참i1을 다시 추가한 후', 접두사);

끝


함수 is_equal = SameGdxDump(ws, gdxfile, 예상 결과)

cmd = 전체 파일(ws.systemDirectory(), 'gdxdump');

cmd_arg = fullfile(ws.workingDirectory(), gdxfile);


[상태, cmdout] = 시스템([cmd, ' ', cmd_arg]);

cmdout = strsplit(cmdout, char(10));

found_start = false;

for i = numel(cmdout):-1:1

iffound_start

cmdout(i) = [];

끝

if strcmp(cmdouti, '$oneempty')

found_start = true;

끝

끝

expectedResult = strsplit(expectedResult, char(10));


is_equal = true;

if numel(expectedResult) ~= numel(cmdout)

is_equal = false;

반환

끝

for i = 1:numel(cmdout)

if ~strcmp(cmdouti, 예상결과i)

is_equal = false;

반환

끝

끝

끝