설명

간단한 2 x 2 x 2 일반 평형 모델.

Shoven, J 및 Whalley, J, Applied G.E. 모델. 경제 저널
문헌 22(1984).

키워드: 혼합 상보성 문제, 일반 평형 모형

소형 모델 유형 :MCP

카테고리 : 메가 슬롯 모델 라이브러리

메인 파일 : two3mcp.gms

$title 단순 2 x 2 x 2 일반 평형 모형 (TWO3MCP,SEQ=131)

$onText
단순 2 x 2 x 2 일반균형모형.

Shoven, J 및 Whalley, J, Applied G.E. 모델. 경제 저널
문헌 22(1984).

키워드: 혼합상보성 문제, 일반균형 모형
$offText

세트
   f '요소' / 노동, 자본 /
   s '섹터' / mfrs, nonmfrs /
   h '가구' / 부자, 가난한 /;

별칭 (s,ss), (f,ff);

* 수요함수 매개변수.
매개변수 sigmac(h) / 풍부함 1.5, 부족함 0.75 /;

테이블 알파(s,h)
             부자 가난한
   제조사 0.5 0.3
   비MFRS 0.5 0.7;

테이블 e(f,h)
             부자 가난한
   노동 60
   자본금 25 ;

* 생산 기능 매개변수.
매개변수 phi(s) / mfrs 1.5, nonmfrs 2.0 /;

테이블 delta(f,s) '요인 공유 계수'
             제조사 비MFRS
   노동 0.6 0.7
   자본금 0.4 0.3;

매개변수
   시그마(들) '인자 대체의 탄력성' / mfrs 2.0, nonmfrs 0.5 /
   tshr(h) '세수 지분'
   t(f,s) '종가세율';

tshr(h) = 0;
t(f,s) = 0;

양수변수
   W(f) '요인 가격'
   P(s) '상품 가격'
   Y(s) '생산 수준'
   I(h) '소득';

방정식
   fmkt(f) '요소 시장'
   cmkt(s) '상품 시장'
   이익(들) '제로 이익'
   소득(h) '소득 방정식';

fmkt(f)..
   sum(h, e(f,h)) =g= sum(s, Y(s)*phi(s)**(sigma(s) - 1)
                   * (델타(f,s)*(합계(ff, 델타(ff,s)**시그마(들)
                   * (W(ff)*(1 + t(ff,s)))**(1 - 시그마(들)))
                   ** (1/(1 - 시그마))/파이)
                   / (W(f)*(1 + t(f,s))))**시그마);

cmkt(들)..
   Y(s) =g= sum(h, (i(h)/sum(ss, alpha(ss,h)*P(ss)**(1 - sigmac(h))))*alpha(s,h)*(1/P(s))**sigmac(h));

이익..
   sum(f, delta(f,s)**시그마(들)*(W(f)*(1 + t(f,s)))**(1 - 시그마(들)))**(1/(1 - 시그마(들)))/phi(s) =g= P(s);

소득(h)..
   I(h) =g= 합(f, E(f,h)*W(f)) + tshr(h)
         * 합계((s,f), t(f,s)*W(f)*Y(s)*phi(s)**(시그마 - 1)
                     * (델타(f,s)*(합계(ff, 델타(ff,s)**시그마(들)
                     * (W(ff)*(1 + t(ff,s)))**(1 - 시그마(들)))
                    ** (1/(1 - 시그마(들)))/phi(들))/(W(f)*(1 + t(f,s))))**시그마);

모델 jel / fmkt.W, cmkt.P,profit.Y,income.I/;

* 이 차원 문제에 대한 계산 솔루션:
W.lo(f) = 0.0001;
P.lo(들) = 0.0001;
W.l(f) = 1;
P.1(s) = 1;
Y.1(s) = 10;
I.l(h) = sum(f, W.l(f)*E(f,h));

* 참고 사례를 해결하세요.
W.fx("노동") = 1;
mcp를 사용하여 jel을 해결합니다.

* 테스트 문제에 세금 적용:
tshr("부자") = 0.4;
tshr("가난함") = 1 - tshr("부자");
t("자본","mfrs") = 0.5;
mcp를 사용하여 jel을 해결합니다.