설명

폰 투넨 모델의 일반 평형 변형.

소형 모델 유형 :MCP

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

메인 파일 : vonthmcp.gms

$title von Thunen 모델의 일반 평형 변형(VONTHMCP,SEQ=136)

$onText
von Thunen 모델의 일반 평형 변형.

Rowse, Mackinnon, Samuelson 및 von Thunen, 일반 균형 변형
폰 투넨 모델의

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

세트
   r '지역' / r1*r12 /
   c '상품' / 밀, 쌀, 옥수수, 보리 /
   h '가구' / 노동자, 소유자, 포터 /;

스칼라
   '노동자금' / 30 /
   trns '교통 기부금' / 20 /;

매개변수
   d(r) '지역 r까지의 거리'
   a(r) '지역 r의 면적'
   t(c) '운송 요건'
   phi(c) '비용 함수 척도 매개변수'
   beta(c) '비용 함수 공유 매개변수'
   alpha(*,h) '요구 함수 공유';

d(r) = 5*(2*ord(r) - 1);
a(r) = 2*3.1415*d(r);

테이블 기타(*,*)
            밀 쌀 옥수수 보리 레저
   파이 1 2 3 4
   베타 0.9 0.7 0.5 0.3
   t 0.015 0.006 0.004 0.01
   근로자 0.2 0.3 0.1 0.3 0.1
   소유자 0.3 0.3 0.2 0.2
   포터 0.6 0.2 0.1 0.1 ;

phi(c) = misc("phi",c);
베타(c) = misc("베타",c);
t(c) = 기타("t",c);
알파(c,h) = 기타(h,c);
alpha("여가",h) = misc(h,"여가");

양수변수
   cst(r,c) '단가 함수'
   y(r,c) '출력 수준'
   ip(r) '개입 구매'
   pk(r) '임대료'
   wp '포터 임금'
   wl '근로자 임금'
   p(c) '시장 가격';

방정식
   def_cst(r,c)
   prf_y(r,c)
   pkbnd(r)
   mkt_k(r)
   mkt_t
   mkt_l
   mkt_g(c);

def_cst(r,c).. phi(c)*cst(r,c) =g= (wl/beta(c))**beta(c)*(pk(r)/(1 - beta(c)))**(1 - beta(c));

prf_y(r,c).. cst(r,c) + t(c)*d(r)*wp =g= p(c);

pkbnd(r).. pk(r) =g= 0.0001*wl;

mkt_k(r).. a(r) - ip(r) =g= sum(c, y(r,c)*(1 - beta(c))*cst(r,c))/pk(r);

mkt_t.. trns =g= sum((r,c), t(c)*d(r)*y(r,c));

mkt_l.. wl*ltot =g= sum((r,c), y(r,c)*beta(c)*cst(r,c)) + alpha("레저","포터")*ltot;

mkt_g(c).. p(c)*sum(r, y(r,c)) =g= alpha(c,"porter")*trns*wp
                                     + alpha(c,"작업자")*ltot*wl
                                     + alpha(c,"소유자")*sum(r, pk(r)*(a(r) - ip(r)));

p.lo(c) = 0.1;
pk.lo(r) = 0.001;

모델 vonthun / def_cst.cst, prf_y.y, pkbnd.ip, mkt_k.pk, mkt_t.wp, mkt_l.wl, mkt_g.p /;

cst.l(r,c) = 1;
y.l(r,c) = 1;
IP.1(r) = 0;
pk.l(r) = 1;
wp.l = 1;
wl.l = 1;
p.l(c) = 1;

* 노동 임금을 숫자로 사용:
wl.fx = 1;

mcp를 사용하여 vonthun을 해결합니다.

y.l, cst.l을 표시합니다.