설명

스카프의 활동 분석 예

Scarf, H 및 Hansen, T, 경제 균형 계산.
예일 대학 출판부, 1973.

기고자: Michael Ferris, 2010년 10월

소형 모델 유형 :EQUIL

카테고리 : 슬롯 나라 EMP 라이브러리

메인 파일 : scarfemp-dem.gms

$title Scarf의 활동 분석 예(SCARFEMP-DEM,SEQ=51)

$onText

Scarf의 활동 분석 예

Scarf, H 및 Hansen, T, 경제 균형 계산.
예일 대학 출판부, 1973.

기고자: Michael Ferris, 2010년 10월
$offText

$call gamslib -q 스카프mcp
$include 스카프데이터.inc

옵션 limrow = 0, limcol = 0;

긍정적인
변수
        y(s) 생산,
        x(c,h) 마샬 수요,
        p(c) 상품 가격,
        i(h) 소득;

방정식
        mkt(c) 상품 시장,
        이익 제로 이익,
        소득(h) 소득지수;

mkt(c).. 합계(s, a(c,s) * y(s)) + 합계(h, e(c,h)) =g=
                합계(h, x(c,h));

이익(들).. -sum(c, a(c,s) * p(c)) =g= 0;

소득(h).. i(h) =g= sum(c, p(c) * e(c,h));

p.l(c) = 1;
i.l(h) = sum(c, p.l(c) * e(c,h));

p.lo(c) = 0.00001$(smax(h, alpha(c,h)));
y.lo(들) = 0;

* 숫자 상품의 가격을 수정합니다.

i.fx(h)$(ord(h) eq 1) = i.l(h);

변수 z(h);
방정식 objdef(h), 예산(h);

* CES 수요함수와 Cobb-Douglas 수요함수 구별:
* 다음은 Cobb Douglas 함수에 대한 작업입니다(esub(h) = 1).

objdef(h)..
  z(h) =e=
  (1/rho(h))*log(sum(c$alpha(c,h),lambda(c,h)*x(c,h)**rho(h)))$(esub(h) ne 1)

  + sum(c$alpha(c,h), alpha(c,h)*log(x(c,h)))$(esub(h) eq 1);

예산(h)..
  sum(c, p(c)*x(c,h)) =l= i(h);

모델 스카프 /objdef, 예산, mkt, 이익, 수입/;

* 콥 더글라스의 경우
* esub(h) = 1;

* 생산을 위한 초기값 설정(y)
x.l(c,h) = 1;
* x.l(c,h) = 0.1;
x.lo(c,h) = 0.00001$alpha(c,h);
x.fx(c,h)$(알파(c,h) 아님) = 0;

파일 myinfo / '%emp.info%' /;
myinfo / '평형'을 입력하세요.
넣다 / 'vi 소득 i';
넣어 / 'vi mkt p';
넣어 / 'vi 이익 y';
루프(h,
  넣다 / '최대' z(h);
  loop(c, put / x(c,h) );
  put / objdef(h) 예산(h);
);
닫아두다 /;

* 소비변수의 좋은 출발점 결정
i.fx(h) = i.l(h);
p.fx(c) = p.l(c);
y.fx(s) = y.l(s);
emp를 사용하여 스카프를 해결합니다.

p.lo(c) = 0.00001$(smax(h, alpha(c,h)));
p.up(c) = inf;
y.lo(들) = 0; y.up(s) = inf;
emp를 사용하여 스카프를 해결합니다.

* 이제 진짜로 풀어보세요
i.lo(h) = 0; i.up(h) = inf;
i.fx(h)$(ord(h) eq 1) = i.l(h);
emp를 사용하여 스카프를 해결합니다.

y.l을 표시;