hansmcp.gms : Hansen의 활동 분석 예시 - MCP

설명

한센의 활동 분석 예시.

소형 모델 유형 :MCP


카테고리 : 슬롯 사이트 추천 모델 라이브러리


메인 파일 : hansmcp.gms

$title Hansen의 활동 분석 예(HANSMCP,SEQ=135)

$onText
Hansen의 활동 분석 예.

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

키워드: 혼합 상보성 문제, 활동도 분석, 일반 평형 모델,
          사회회계 매트릭스, 유럽 지역 정책, 영향 분석
$offText

세트
   c '상품' / 농업, 식품, 섬유, hserv, Entert, houseop, capeop
                     철강, 석탄, 목재, 하우스밥, 캡밥, 노동, 교환 /
   h '소비자' / 에이전트1*에이전트4 /
   s '섹터' / dom1*dom12, imp1*imp7, exp1*exp7 /;

별칭(c,cc);

표 e(c,h) '상품 기부금'
              에이전트1 에이전트2 에이전트3 에이전트4
   하우스밥 2 0.4 0.8
   캡밥 3 2 7.5
   노동 0.6 0.8 1 0.6;

테이블 d(c,h) '기준 요구사항'
              에이전트1 에이전트2 에이전트3 에이전트4
   농업 0.1 0.2 0.3 0.1
   식품 0.2 0.2 0.2 0.2
   섬유 0.1 0.1 0.3 0.1
   hserv 0.1 0.1 0.1 0.1
   입력 0.1 0.1 0.1 0.1
   하우스옵 0.3 0.1 0.1
   카펩 0.1 0.2 0.3;

매개변수 esub(h) '수요 탄력성' / 에이전트1 1, 에이전트2 1
                                             에이전트3 1, 에이전트4 1 /;

테이블 데이터(*,c,s) '활동 분석 매트릭스'
                      dom1 dom2 dom3 dom4 dom5
   출력.농업 5.00
   출력.음식 5.00
   출력.섬유 2.00
   출력.hserv 2.00
   출력.입력 4.00
   출력.houseop 0.32
   출력.capop 0.40 1.30 1.20
   입력 .agric 3.50 0.10 0.70
   입력 .food 0.90 0.10 0.80
   입력 .textiles 0.20 0.50 0.10 0.10
   입력 .hserv 1.00 2.00 2.00 2.00
   입력 .강철 0.20 0.40 0.20 0.10
   투입 .석탄 1.00 0.10 0.10 1.00
   입력 .lumber 0.50 0.40 0.30 0.30
   입력 .housbop 0.40
   입력 .capbop 0.50 1.50 1.50 0.10 0.10
   투입 .노동 0.40 0.20 0.20 0.02 0.40

   + dom6 dom7 dom8 dom9 dom10
   출력.houseop 0.80
   출력.capop 1.10 6.00 1.80 1.20 0.40
   출력.스틸 2.00
   출력.석탄 2.00
   출력.목재 1.00
   입력 .textiles 0.80 0.40 0.10 0.10 0.10
   입력 .hserv 0.40 1.80 1.60 0.80 0.20
   입력 .steel 1.00 2.00 0.50 0.20
   투입 .석탄 0.20 1.00 0.20
   입력 .lumber 3.00 0.20 0.20 0.50
   입력 .capbop 1.50 2.50 2.50 1.50 0.50
   투입 .노동 0.30 0.10 0.10 0.40 0.40

   + dom11 dom12 임프1 임프2 임프3
   출력.농업 1.00
   출력.음식 1.00
   출력.섬유 1.00
   출력.houseop 0.36
   출력.capop 0.90
   입력 .hserv 0.40 0.20 0.20
   입력 .housbop 0.40
   입력 .capbop 1.00 0.20 0.10 0.10
   입력 .노동 0.04 0.02 0.02
   입력 .교환 0.50 0.40 0.80

   + 임프4 임프5 임프6 임프7 exp1
   출력.capop 1.00
   출력.강철 1.00
   출력.석탄 1.00
   출력.목재 1.00
   출력.교환 0.50
   .agric 1.00 입력
   입력 .hserv 0.40 0.40 0.40 0.40 0.20
   입력 .capbop 0.20 0.20 0.20 0.20 0.20
   투입 .노동 0.04 0.04 0.04 0.04 0.04
   입력 .교환 1.20 0.60 0.70 0.40

   + exp2 exp3 exp4 exp5 exp6
   출력.교환 0.40 0.80 1.20 0.60 0.70
   .food 1.00 입력
   .textiles 1.00 입력
   입력 .hserv 0.20 0.20 0.40 0.40 0.40
   .capop 1.00 입력
   .steel 1.00 입력
   .coal 1.00 입력
   입력 .capbop 0.10 0.10 0.20 0.20 0.20
   투입 .노동 0.02 0.02 0.04 0.04 0.04

   + 특급7
   출력.교환 0.40
   .hserv 0.40 입력
   입력 .lumber 1.00
   입력 .capbop 0.20
   입력 .노동 0.04;

매개변수
   alpha(c,h) '수요 함수 공유 매개변수'
   a(c,s) '활동 분석 매트릭스';

알파(c,h) = d(c,h)/sum(cc, d(cc,h));
a(c,s) = data("출력",c,s) - data("입력",c,s);

양수 변수
   p(c) '상품 가격'
   y(s) '생산'
   i(h) '소득';

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

* CES 수요함수와 Cobb-Douglas 수요함수 구별:
mkt(c).. 합계(s, a(c,s)*y(s)) + 합계(h, e(c,h))
           =g= sum(h$(esub(h) <> 1), (i(h)/sum(cc, alpha(cc,h)*p(cc)**(1 - esub(h))))
                                   * 알파(c,h)*(1/p(c))**esub(h))
            + sum(h$(esub(h) = 1), i(h)*alpha(c,h)/p(c));

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

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

모델 hansen / mkt.p,profit.y,income.i/;

p.l(c) = 1;
y.l(s) = 1;
i.l(h) = 1;
p.lo(c) = 0.00001$(smax(h, alpha(c,h)) > eps);

* 숫자 상품의 가격을 수정합니다.
p.fx(c)$(ord(c) = 1) = 1;

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