설명

명시적인 숫자가 없는 모델에 영향을 미치는 버그가 있었습니다.  에 대한
이러한 모델에서 MPSGE는 소득 수준을 선택하고 이를 숫자로 설정합니다.
이는 솔버에게 전달되지 않았습니다.

마지막으로 영향을 받은 시스템: 슬롯 머신 배포 24.1.3

수정 사항: 슬롯 머신 배포 24.2, 24.1.4(있는 경우).

기고자: Tom Rutherford, 2013년 9월

소형 모델 유형 :MPSGE

카테고리 : 슬롯 머신 테스트 라이브러리

메인 파일 : mpsge13.gms

$title MPSGE 테스트 - 모델이 잘못된 소득 수준을 반환함(MPSGE13,SEQ=620)

$onText
명시적인 숫자가 없는 모델에 영향을 미치는 버그가 있었습니다.  에 대한
이러한 모델에서 MPSGE는 소득 수준을 선택하고 이를 숫자로 설정합니다.
이는 솔버에게 전달되지 않았습니다.

마지막으로 영향을 받은 시스템: 슬롯 머신 배포 24.1.3

수정 사항: 슬롯 머신 배포 24.2, 24.1.4(있는 경우).

기고자: Tom Rutherford, 2013년 9월
$offText

$설정되지 않은 경우 TESTTOL $set TESTTOL 1e-4
스칼라 tol / %TESTTOL% /;

매개변수 tl 노동세 / 0.5 /;

$onText
$model:간단함

$WALCHK:.참입니다.
$FUNLOG:.true.
$DATECH:.true.

$섹터:
    엑스! 생산 활동

$상품:
    PX! 총산출 가격
    PL! 임금률(세금 제외)
    PK! 자본임대료

$소비자:
    ㅎ! 가구
    정부! 정부

$prod:X s:1
    o:PX q:100
    i:PL q:40 p:1.25 a:GOVT t:tl
    나:PK q:50

$수요:GOVT
    d:PX q:5
    e:PX q:(-5)

$수요:HH s:1
    d:PX q:95
    d:PL q:20
    e:PL q:60
    e:PK q:50
    e:PX q:5

$보고서:
    v:DX d:PX 수요:HH
    v:DL d:PL 수요:HH

$offText
$sysInclude mpsgeset가 더 간단해졌습니다.

$include SIMPLER.GEN
mcp를 사용하여 더 간단하게 해결하십시오.

매개변수 chk;
chk("HH") = HH.L;
chk("HH*") = (PL.L*60+PK.L*50+PX.L*5);
chk("HH**") = PX.L*DX.L + PL.L*DL.L;
파일 로그 /''/;
putclose 로그 ' '/
 'HH = ', chk("HH") /
 'HH* = ', chk("HH*") /
 'HH**= ', chk("HH**") /
 ' '/;

abort$[abs(chk("HH*")-chk("HH**")) > tol] '잘못된 검사', chk;
abort$[abs(chk("HH*")-chk("HH" )) > tol] '잘못된 검사', chk;