슬롯 사이트 추천gms : 타보라 농촌개발 - 연료목 생산

설명

옥수수와 담배를 재배하는 탄자니아의 한 마을은 위기에 직면해 있습니다.
마을 근처의 관리되는 산림에 투자하기로 결정하거나
증가가 필요한 자연림에서 목재를 계속 수확합니다.
자원이 고갈됨에 따라 이동 시간이 늘어납니다. 투자는
관리되는 숲은 30년 동적 모델을 사용하여 분석됩니다.

대형 모델 유형 :LP


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


메인 파일 : 슬롯 사이트 추천gms

$title 슬롯 사이트 추천 농촌 개발 - 연료재 생산 (슬롯 사이트 추천SEQ=57)

$onText
옥수수와 담배를 재배하는 탄자니아의 한 마을은
마을 근처의 관리되는 산림에 투자하기로 결정하거나
증가가 필요한 자연림에서 목재를 계속 수확합니다.
자원이 고갈됨에 따라 이동 시간이 늘어납니다. 투자는
관리되는 산림은 30년 동적 모델을 사용하여 분석됩니다.

탄자니아 세계은행: 타보라 농촌 개발 프로젝트 평가.
기술. 대표자, 세계은행, 1977.

키워드: 선형 계획법, 농업 생산, 에너지 경제학, 임업,
          장작 생산
$offText

세트
   t '기간' / y01*y30 /
   '나무의 시대' / a01*a24 /
   m '월' / 1월, 2월, 3월, 4월, 5월, 6월, 7월, 8월, 9월, 10월, 11월, 12월 /
   mc(m) '절단 개월' / 7월, 8월, 9월, 10월 /
   나는 '매년' / 1*9 /
   c '연간 작물' / 옥수수, 담배 /;

테이블 ld(*,m) '노동 요건'
               1월 2월 3월 4월 5월 6월 7월 8월 9월 10월 11월 12월
   담배 44.7 84.2 87.3 90.7 20.5 37.3 44.7 19.7 46.4
   옥수수 46.7 10.0 13.0 16.7 18.3 13.3 33.3
   목재-1 10.0 3.0 10.0 1.0 7.0 8.0 9.0
   목재-2 7.0 10.0 1.0
   기타 10.0 8.0 12.0 10.0 4.0 2.0 10.0 28.0 24.0;

테이블 tmd(*,c) '데이터 자르기'
                담배 옥수수
   투입비용 2000 20
   수확량 675750
   가격 8.4 .8;

스칼라
   nfam '마을의 가족 수' / 400 /
   스팸 '가족 규모(성인 동등)' / 3 /
   resw '예약 임금(시간당 tsh)' / .5 /
   fdmaize '국내 옥수수 수요(가구당 kg)' / 650 /
   tob '정상상태 담배(ha)' / 234 /
   sr '원환의 시작 반경(km)' / 5 /
   width '환의 폭(km)' / 1 /
   ws '걷는 속도(시속km)' / 5 /
   whd '일당 근무 시간' / 10 /
   wdm '월별 근무일' / 25 /
   tr '운송 비용(km당 m3당 tsh)' / 1.31 /
   tc '목재 식재 비용(ha당 tsh)' / 349 /
   wrc '양생용 목재(ha당 m3)' / 46.75 /
   dwr '국내 목재 요구량(가족당 m3)' / 10 /
   labwc '삼림 벌채 노동(m3당 인력)' / 1 /
   labvc '목재 절단 노동(m3당 인력)' / .5 /
   yw '기존 산림의 수확량(ha당 m3)' / 40 /
   rho '할인율' / .1 /
   matr '담배 이후 옥수수 수확량 개선' / .25 /
   dmaize '마을 내 국내 옥수수 수요(kg)'
   wr '가정용 목재 요구량 및 담배 경화(m3)';

매개변수
   yv(a) '재목 수확량(ha당 m3)' / (a08,a16,a24) 120 /
   vr(t) '목재의 잔존 가치(tsh)'
   노동(m) '마을 노동공급(인-일)'
   fa(i) '환의 면적(ha)'
   dist(i) '환의 평균 거리(km)'
   labw(i) '삼림 벌채를 위한 노동(인일)'
   cc(c) '입력 비용(ha당 tsh)'
   yc(c) '작물 수확량(ha당 kg)'
   pc(c) '농작물 가격(kg당 tsh)'
   cr(c) '작물 수익(ha당 tsh)'
   delt(t) '할인 요소'
   delta(a) '나무 나이에 대한 할인 인자';

dmaize = fdmaize*nfam;
wr = tob*wrc + dwr*nfam;
delt(t) = (1 + rho)**(-ord(t));
델타(a) = (1 + rho)**(-ord(a));
vr(t) = tr*sr*sum(a$(ord(t) + ord(a) > 카드(t)), yv(a)*delta(a));
dist(i) = sr - 너비/2 + 너비*ord(i);
fa(i) = 100*3.1416*dist(i)*너비;
노동(m) = nfam*(sfam*wdm - ld("기타",m));
labw(i) = yw*labwc*whd/(whd - 2*dist(i)/ws);
cc(c) = tmd("입력 비용",c);
yc(c) = tmd("수율",c);
pc(c) = tmd("가격",c);
cr(c) = yc(c)*pc(c);

dmaize, wr, delt, delta, vr, fa, yv, dist, labw, pc, yc, cc, cr을 표시합니다.

$sTitle 모델 정의
변수
   w(t,i) '기존 산림 벌채(ha)'
   v(t) '재목 관리(ha)'
   x(t,c) '자르기 활동(ha)'
   mat(t) '담배 뒤의 옥수수(ha)'
   lc(t,m) '목재 절단 노동(인일)'
   rev(t) '수익(1000tsh)'
   비용(t) '연간 비용(1000tsh)'
   소득 '할인된 소득(할인된 1000 tsh)';

양수 변수 w, v, x, mat, lc;

방정식
   wb(t) '목재균형(m3)'
   wa(i) '목재 가용성(ha)'
   lb(t,m) '노동수지(인-일)'
   lw(t) '목재 절단에 대한 노동 제약(man-days)'
   matd1(t) '담배 뒤의 옥수수: 유형 1(ha)'
   matd2(t) '담배 다음의 옥수수: 유형 2(ha)'
   mm(t) '최소 옥수수 수요(kg)'
   ttb(t) '포스트 터미널 목재 경계(m3)'
   rd(t) '수익 정의(1000 tsh)'
   cd(t) '비용 정의(1000 tsh)'
   od '객관적 정의(1000tsh 할인)';

wb(t).. yw*sum(i, w(t,i)) + sum(a, yv(a)*v(t-ord(a))) =g= wrc*x(t,"담배") + dwr*nfam;

wa(i)..sum(t, w(t,i)) =l= fa(i);

lb(t,m).. ld("목재-1",m)*v(t) + ld("목재-2",m)*v(t-1)
           + sum(c, ld(c,m)*x(t,c)) + lc(t,m)$mc(m) =l= 노동(m);

lw(t).. 합계(mc, lc(t,mc)) =e= 합계(i, labw(i)*w(t,i))
                                + sum(a, labvc*yv(a)*v(t-ord(a)));

mm(t).. yc("옥수수")*(x(t,"옥수수") + matr*mat(t)) =g= dmaize;

ttb(t).. sum(a , yv(a)*v(t + (card(t) - ord(a)))) =l= wr;

matd1(t-1).. mat(t) =l= x(t-1,"담배");

matd2(t).. mat(t) =l= x(t,"옥수수");

rd(t).. rev(t) =e= (sum(c, cr(c)*x(t,c)) + matr*cr("옥수수")*mat(t))/1000;

cd(t).. 비용(t) =e= (sum(c, cc(c)*x(t,c)) + tc*v(t) + resw*whd*sum(mc, lc(t,mc))
                      + 합계(i, tr*yw*dist(i)*w(t,i)))/1000;

od.. 소득 =e= sum(t, delt(t)*(rev(t) - 비용(t) + vr(t)*v(t)/1000));

mat.up("y01") = tob;

모델 타보라 / 모두 /;

* 이 문제는 규모가 좋지 않고 그림자 가격이 너무 작아서
* 지난 몇 기간 동안 0과 구별할 수 없었습니다. 자동 확장
* apex4를 사용할 때 필요합니다. 다음 옵션 설명이 필요했습니다.
* 옵션 규모 = 켜짐;
lp를 사용하여 소득을 극대화하는 슬롯 사이트 추천를 해결합니다.

매개변수 담당자1 '요약 보고서';
rep1(t,"소득") = rev.l(t) - 비용.l(t);
rep1(t,"목재") = v.l(t);
담당자1(t,c) = x.l(t,c);
rep1(t,"숲") = sum(i, w.l(t,i));
rep1(t,"거리")$rep1(t,"숲") = sum(i, dist(i)*w.l(t,i))/rep1(t,"숲");

담당자1 표시;