설명
이것은 무료 슬롯 사이트/EMP를 사용하여 공식화된 TWO3MCP 모델입니다.
참고 자료: Shoven 및 Whalley: "적용된 G.E. 모델"
경제문학저널, XXII(1984)
소형 모델 유형 :EQUIL
메인 파일 : two3emp.gms
$title 단순 2 x 2 x 2 일반균형 모형의 EMP 공식화(TWO3EMP,SEQ=68)

$onText
이는 무료 슬롯 사이트/EMP를 사용하여 공식화된 TWO3MCP 모델입니다.

참고 자료: Shoven 및 Whalley: "적용된 G.E. 모델"
            경제문학저널, XXII (1984)
$offText

세트
        f 요인 /노동, 자본/
        s 섹터 /mfrs, nonmfrs/
        h 가구 /부자, 빈곤/;

*
* 수요함수 매개변수.
*
매개변수 시그마크(h)
       / 부자 1.5, 가난 0.75/;

매개변수 rhoc(h) 원시 탄력성 매개변수;
rhoc(h) = (sigmac(h)-1)/sigmac(h);

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

테이블 e(f,h)
                부자 가난한
        노동 60
        자본금 25
*
* 생산 기능 매개변수.
*
매개변수 파이
        / 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;

매개변수 rho(s) 원시 형태 탄력성 매개변수;
rho(들) = (시그마(들)-1)/시그마(들);

긍정적인
변수
        W(f) 요소 가격,
        P(s) 상품 가격,
        Y(들) 생산 수준,
        C(s) 생산의 한계비용,
        X(f,s) 조건부 요인 요구 사항,
        D(s,h) 상품에 대한 최종 수요
변수
        나(h) 소득;

방정식
        fmkt(f) 팩터 시장,
        cmkt(s) 상품 시장,
        이익 제로 이익,
        소득(h) 소득 방정식;

* 요소 공급(기부금)은 요소 수요와 동일합니다.

fmkt(f).. sum(h, e(f,h)) =g= sum(s, Y(s) * X(f,s));

* 상품 생산량은 상품 수요와 동일합니다.

cmkt(s).. Y(s) =g= sum(h, D(s,h));

* 단가는 시장 가격과 같습니다.

이익(들).. C(s) =g= P(s);

* 소득은 요소 소득에 재분배된 세수를 더한 값과 같습니다.

소득(h).. I(h) =e= 합계(f, E(f,h)*w(f)) + TSHR(h)*sum((s,f), t(f,s) * W(f) * Y(s) * X(f,s));

* 다음은 조건부 요소수요와 최종수요를 정의한다.
* 개별 최적화 문제의 원초적 표현을 기반으로 함:

방정식 DEFCOST(s) 생산 단가를 정의합니다.
                DEFUTIL(h) 가정용 유틸리티를 정의합니다.
                ISOQUANT(s) 요소 수요가 실현 가능해야 함
                BUDGET(h) 예산의 일관성을 정의합니다.

변수 COST(s) 단위 비용 함수
                유틸리티(h) 가정용 유틸리티;

defcost(s).. COST(s) =e= sum(f, (1 + t(f,s)) * W(f) * X(f,s));

defutil(h).. UTILITY(h) =e= sum(s, alpha(s,h)**(1/sigmac(h)) * D(s,h)**rhoc(h))**(1/rhoc(h));

등량곡선.. phi(s) * sum(f, delta(f,s) * X(f,s)**rho(s))**(1/rho(s)) =g= 1;

예산(h).. 합계(s, P(s) * D(s,h)) =l= I(h);

모델 젤 / defcost, defutil, 등량, 예산, fmkt, cmkt, 이익, 수입/;

* 이 차원 문제에 대한 계산 솔루션:

W.lo(f) = 0.0001;
P.lo(들) = 0.0001;
X.lo(f,s) = 0.0001;
D.lo(s,h) = 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));
X.l(f,s) = 1;
D.l(s,h) = 1;

* 숫자를 수정하세요. 이 문제를 해결하려면 꼭 필요합니다.

W.fx("노동") = 1;

파일 myinfo / '%emp.info%' /;
myinfo를 입력하세요 '* Shoven & Whalley 1984';
넣다 / '평형' /;
루프(들,
  '최소' 비용을 입력하세요. /;
  loop(f, put X(f,s));
  put / DEFCOST(s) ISOQUANT(s) /;
);
루프(h,
  '최대'를 입력하세요. UTILITY(h) /;
  loop(s, put D(s,h));
  넣다 / DEFUTIL(h) BUDGET(h) /;
);
넣어 / 'vi 소득 I'/;
'vi CMKT P'를 입력하세요/;
'vi PROFIT Y'를 입력하세요/;
'vi FMKT W'/를 입력하세요.
'dualvar C ISOQUANT'/를 입력하세요.
닫다;

* 소득을 고정하여 좋은 출발점을 찾으십시오
I.fx(h) = sum(f, E(f,h)*w.l(f));
emp를 사용하여 jel을 해결합니다.

* 이제 실제 문제를 해결해보세요
I.lo(h) = -inf; I.up(h) = inf;
emp를 사용하여 jel을 해결합니다.

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