설명

새로운 투입으로 경제성장을 설명합니다.

대형 모델 유형 :MPSGE mcp

카테고리 : 슬롯 커뮤니티 모델 라이브러리

메인 파일 : dmcmge.gms

$title 새로운 투입물을 통한 경제성장 회계(DMCMGE,SEQ=143)

$onText
새로운 투입물을 통한 경제성장 회계.

Markusen, JR 및 Feenstra, R, 새로운 입력을 통한 성장 회계, 1993.

키워드: 혼합상보성 문제, 경제 발전, 경제 성장 모델,
          슬롯 커뮤니티 - MPSGE 프레임워크, 경제적 자원
$offText

T '기간' / 1*12 / 설정;

별칭(T,TP);

스칼라
   S0 / 4 /
   LS0 / 2 /
   KS0 / 1 /
   RS0 / 1 /
   X0 / 10 /
   LX0 / 4 /
   KX0 / 6 /
   N0 / 2 /
   LN0 / .8 /
   KN0 / 1.2 /
   Z0 / 12 /
   XZ0 / 10 /
   FZ0 / 2 /
   LSK0 / 1 /
   U0 / 2 /
   CU0 / 1 /
   CZU0 / 1 /
   SIGMA '대체탄력성' / 6 /
   베타 '대체 지수'
   DELTA '감가상각률' / 0.1 /
   RHO '할인율' / 0.25 /
   SL0 '기준연도 노동' /100 /
   GLLOW '노동 증가율 하한' / 0.02 /
   GLHIGH '노동 증가율 상한' / 0.03 /
   SR0 '기준 연도 자원' / 50 /
   GRLOW '자원 증가의 하한' / 0.01 /
   GRHIGH '자원 증가의 상한' / 0.03 /;

베타 = (SIGMA - 1)/SIGMA;

매개변수
   SL(T) '노동공급(시끄러움)'
   SR(T) '자원 공급(시끄러움)';

SL("1") = SL0;
SR("1") = SR0;

옵션 SEED = 1001;

루프(티,
   SL(T+1) = SL(T)*(1 + 글로우 + (GLHIGH - 글로우)*균일(0,1));
   SR(T+1) = SR(T)*(1 + GRLOW + (GRHIGH - GRLOW)*균일(0,1));
);

$onText
$모델:DMC

$섹터:
   에스(티)
   엑스(티)
   엔(티)
   지(티)
   에스케이(T)
   유틸리티(T)
   여

$상품:
   유토
   엘(티)
   케이(티)
   R(티)
   CX(티)
   FC(티)
   씨(티)
   체코(T)
   유(티)

$소비자:
   단점

$보조:
   서브(티)
   익스팬(T)

$PROD:S(T) s:1
   O:C(T) Q:S0
   나:L(T) Q:LS0
   I:K(T) Q:KS0
   나:R(T) Q:RS0

$PROD:X(T) s:1
   O:CX(T) Q:X0
   나:L(T) Q:LX0
   I:K(T) Q:KX0

$PROD:N(T) t:0 초:1
   O:FC(TP)$(ord(TP) >= ord(T)) Q:N0
   I:L(T) Q:LN0
   I:K(T) Q:KN0

$PROD:Z(T) s:1
   O:CZ(T) Q:Z0 A:CONS N:SUB(T) M:-1
   I:CX(T) Q:XZ0
   I:FC(T) Q:FZ0

$PROD:SK(T)
   O:K(TP)$(ord(TP) >= ord(T)) Q:((1 - DELTA)**(ord(TP) - ord(T)))
   나:L(T) Q:LSK0

$PROD:UTIL(T) s:1
   O:U(T) Q:U0
   I:C(T) Q:CU0
   I:CZ(T) Q:CZU0

$PROD:W s:1.5
   오:우토
   I:U(T) Q:((1 + RHO)**(1 - ord(T)))

$수요:단점
   전자:엘(티) Q:SL(티)
   E:R(T) Q:SR(T)
   E:CZ(T) R:EXPAN(T)
   D:UTOT

$제약조건:EXPAN(T)
   EXPAN(T) =g= Z0**(1/베타)*Z(T)**(1/베타) - Z0*Z(T);

$제약조건:SUB(T)
   SUB(T) =g= EXPAN(T)/(Z0*Z(T));
$offText

$sysmpsgeset DMC 포함

* 첫 번째 패스에 대한 IRTS 항목을 생략합니다.
EXPAN.fx(T) = 0;
SUB.fx(T) = 0;

* 숫자를 지정하세요:
UTOT.fx = 1;

* CRTS 모델 생성 및 해결:
$include DMC.GEN
mcp를 사용하여 DMC를 해결합니다.

EXPAN.up(T) = +inf;
SUB.up(T) = +inf;
EXPAN.1(T) = Z0**(1/베타)*Z.1(T)**(1/베타) - Z0*Z.1(T);
SUB.1(T) = EXPAN.1(T)/(Z0*Z.1(T));

* 생성 및 해결:
$include DMC.GEN
mcp를 사용하여 DMC를 해결합니다.