참조
카테고리 : 무료 슬롯 사이트 PSOPT 라이브러리
메인파일 : 다중주기DCOPF24bus.gms
$title 풍력 및 부하 차단을 고려한 IEEE 24-버스 네트워크용 다주기 DC-OPF
$onText
자세한 내용은 다음 책의 6장(Gcode6.6)을 참조하세요.
소루디, 알리레자. 무료 슬롯 사이트의 전력 시스템 최적화 모델링. 스프링거, 2017.
--------------------------------------------------------------------------------
모델 유형: LP
--------------------------------------------------------------------------------
작성자:
알리레자 소루디 박사
IEEE 수석 회원
이메일: alireza.soroudi@gmail.com
우리는 개발된 무료 슬롯 사이트 코드를 사용하여 파생된 출판물을 요청합니다.
인용함으로써 그 사실을 명시적으로 인정한다.
소루디, 알리레자. 무료 슬롯 사이트의 전력 시스템 최적화 모델링. 스프링거, 2017.
DOI: doi.org/10.1007/978-3-319-62350-4
$offText
세트
버스 / 1*24 /
슬랙(버스) / 13 /
세대 / g1*g12 /
t / t1*t24 /;
스칼라
스베이스 / 100 /
볼 / 10000 /
VOLW / 50 /;
별칭(버스,노드);
표 GD(Gen,*) '발전기 특성'
Pmax Pmin b 비용D 비용t RU RD SU SD UT DT uini U0 So
g1 400 100 5.47 0 0 47 47 105 108 1 1 1 5 0
g2 400 100 5.47 0 0 47 47 106 112 1 1 1 6 0
g3 152 30.4 13.32 1430.4 1430.4 14 14 43 45 8 4 1 2 0
g4 152 30.4 13.32 1430.4 1430.4 14 14 44 57 8 4 1 2 0
g5 155 54.25 16 0 0 21 21 65 77 8 8 0 0 2
g6 155 54.25 10.52 312 312 21 21 66 73 8 8 1 10 0
g7 310 108.5 10.52 624 624 21 21 112 125 8 8 1 10 0
g8 350 140 10.89 2298 2298 28 28 154 162 8 8 1 5 0
g9 350 75 20.7 1725 1725 49 49 77 80 8 8 0 0 2
g10 591 206.85 20.93 3056.7 3056.7 21 21 213 228 12 10 0 0 8
g11 60 12 26.11 437 437 7 7 19 31 4 2 0 0 1
g12 300 0 0 0 0 35 35 315 326 0 0 1 2 0;
* ----------------------------------------
GB(bus,Gen) '각 발전단위의 각 버스 연결성 지수' 설정
/
18.g1
21.g2
1.g3
2.g4
15.g5
16.g6
23.g7
23.g8
7. g9
13.g10
15.g11
22.g12
/;
표 BusData(bus,*) '각 버스의 수요(MW 단위)'
Pd Qd
1 108 22
2 97 20
3 180 37
4 74 15
5 71 14
6 136 28
7 125 25
8 171 35
9 175 36
10 195 40
1326554
14 194 39
1531764
16 100 20
18333 68
19 181 37
2012826;
****************************************************
테이블 분기(버스,노드,*) '네트워크 기술적 특성'
r x b 한계
1 .2 0.0026 0.0139 0.4611 175
1 .3 0.0546 0.2112 0.0572 175
1 .5 0.0218 0.0845 0.0229 175
2 .4 0.0328 0.1267 0.0343 175
2 .6 0.0497 0.192 0.052 175
3 .9 0.0308 0.119 0.0322 175
3 .24 0.0023 0.0839 0 400
4 .9 0.0268 0.1037 0.0281 175
5 .10 0.0228 0.0883 0.0239 175
6 .10 0.0139 0.0605 2.459 175
7 .8 0.0159 0.0614 0.0166 175
8 .9 0.0427 0.1651 0.0447 175
8 .10 0.0427 0.1651 0.0447 175
9 .11 0.0023 0.0839 0 400
9 .12 0.0023 0.0839 0 400
10.11 0.0023 0.0839 0 400
10.12 0.0023 0.0839 0 400
11.13 0.0061 0.0476 0.0999 500
11.14 0.0054 0.0418 0.0879 500
12.13 0.0061 0.0476 0.0999 500
12.23 0.0124 0.0966 0.203 500
13.23 0.0111 0.0865 0.1818 500
14.16 0.005 0.0389 0.0818 500
15.16 0.0022 0.0173 0.0364 500
15.21 0.00315 0.0245 0.206 1000
15.24 0.0067 0.0519 0.1091 500
16.17 0.0033 0.0259 0.0545 500
16.19 0.003 0.0231 0.0485 500
17.18 0.0018 0.0144 0.0303 500
17.22 0.0135 0.1053 0.2212 500
18.21 0.00165 0.01295 0.109 1000
19.20 0.00255 0.0198 0.1666 1000
20.23 0.0014 0.0108 0.091 1000
21.22 0.0087 0.0678 0.1424 500 ;
* --------------------
테이블 WD(t,*)
wd
t1 0.0786666666666667 0.684511335492475
t2 0.0866666666666667 0.644122690036197
t3 0.117333333333333 0.61306915602972
t4 0.258666666666667 0.599733282530006
t5 0.361333333333333 0.588874071251667
t6 0.566666666666667 0.5980186702229
t7 0.650666666666667 0.626786054486569
t8 0.566666666666667 0.651743189178891
t9 0.484 0.706039245570585
t10 0.548 0.787007048961707
t11 0.757333333333333 0.839016955610593
t12 0.710666666666667 0.852733854067441
t13 0.870666666666667 0.870642027052772
t14 0.932 0.834254143646409
t15 0.966666666666667 0.816536483139646
t16 1 0.819394170318156
t17 0.869333333333333 0.874071251666984
t18 0.665333333333333 1
t19 0.656 0.983615926843208
t20 0.561333333333333 0.936368832158506
t21 0.565333333333333 0.887597637645266
t22 0.556 0.809297008954087
t23 0.724 0.74585635359116
t24 0.84 0.733473042484283;
매개변수 Wcap(버스) / 8 200, 19 150, 21 100 /;
분기(버스,노드,'x')$(분기(버스,노드,'x')=0) = 분기(노드,버스,'x');
분기(버스,노드,'한계')$(분기(버스,노드,'한계')=0) = 분기(노드,버스,'한계');
분기(버스,노드,'bij')$branch(버스,노드,'한계') = 1/분기(버스,노드,'x');
분기(버스,노드,'z')$분기(버스,노드,'한계') = sqrt(sqr(분기(버스,노드,'x')) + sqr(분기(버스,노드,'r')));
분기(노드,버스,'z') = 분기(버스,노드,'z');
매개변수 conex(버스,노드);
conex(버스,노드)$(분기(버스,노드,'한계') 및 분기(노드,버스,'한계')) = 1;
conex(버스,노드)$(conex(노드,버스)) = 1;
변수 OF, Pij(버스,노드,t), Pg(Gen,t), delta(버스,t), lsh(버스,t), Pw(버스,t), pc(버스,t);
방정식 const1, const2, const3, const4, const5, const6;
const1(버스,노드,t)$(conex(버스,노드))..
Pij(버스,노드,t) =e= 분기(버스,노드,'bij')*(델타(버스,t) - 델타(노드,t));
const2(버스,티)..
lsh(bus,t)$BusData(bus,'pd') + Pw(bus,t)$Wcap(bus) + sum(Gen$GB(bus,Gen), Pg(Gen,t)) - WD(t,'d')*BusData(bus,'pd')/Sbase =e= sum(node$conex(node,bus), Pij(bus,node,t));
const3..
OF =g= sum((bus,Gen,t)$GB(bus,Gen), Pg(Gen,t)*GD(Gen,'b')*Sbase) + sum((bus,t), VOLL*lsh(bus,t)*Sbase$BusData(bus,'pd') + VOLW*Pc(bus,t)*sbase$Wcap(bus));
const4(gen,t)..
pg(gen,t+1) - pg(gen,t) =l= GD(gen,'RU')/Sbase;
const5(gen,t)..
pg(gen,t-1) - pg(gen,t) =l= GD(gen,'RD')/Sbase;
const6(버스,t)$Wcap(버스)..
pc(버스,t) =e= WD(t,'w')*Wcap(버스)/Sbase - pw(버스,t);
모델 로드플로우 / const1, const2, const3, const4, const5, const6 /;
Pg.lo(Gen,t) = GD(Gen,'Pmin')/Sbase;
Pg.up(Gen,t) = GD(Gen,'Pmax')/Sbase;
delta.up(버스,t) = pi/2;
delta.lo(버스,t) =-pi/2;
delta.fx(slack,t) = 0;
Pij.up(bus,node,t)$((conex(bus,node))) = 1*branch(bus,node,'Limit')/Sbase;
Pij.lo(bus,node,t)$((conex(bus,node))) =-1*branch(bus,node,'Limit')/Sbase;
lsh.up(bus,t) = WD(t,'d')*BusData(bus,'pd')/Sbase;
lsh.lo(버스,t) = 0;
Pw.up(버스,t) = WD(t,'w')*Wcap(버스)/Sbase;
Pw.lo(버스,t) = 0;
Pc.up(버스,t) = WD(t,'w')*Wcap(버스)/Sbase;
Pc.lo(버스,t) = 0;
lp를 사용하여 OF를 최소화하는 로드플로우를 해결합니다.
*$onText
매개변수 보고서(t,bus,*), 혼잡비용, lmp(bus,t);
보고서(t,bus,'Gen(MW)') = 1*sum(Gen$GB(bus,Gen), Pg.l(Gen,t))*sbase;
보고서(t,bus,'각도') = delta.l(bus,t);
보고서(t,bus,'LSH') = lsh.l(bus,t)*sbase ;
보고서(t,버스,'LMP($/MWh)') = const2.m(버스,t)/sbase;
Report(t,bus,'바람(MW)') = Pw.l(bus,t)/sbase;
report(t,bus,'축소(MW)') = Pc.l(bus,t)/sbase;
혼잡 비용 = sum((bus,node,t)$conex(bus,node), Pij.l(bus,node,t)*(-const2.m(bus,t) + const2.m(node,t)))/2;
lmp(버스,t) = 보고서(t,버스,'LMP($/MWh)');
디스플레이 보고서, Pij.l, 혼잡 비용;
임베디드 코드 연결:
- 무료 슬롯 사이트리더:
기호:
- 이름: 보고
- 이름: Pw
- 이름: PC
- 이름: Pg
- 이름: lsh
- 이름: lmp