Курсовая работа: Электрические сети предприятий железнодорожного транспорта

В

ИП Б

А

А Б В

ИП1 ИП2

Рис.3. Преобразование кольцевой сети в разомкнутую с двусторонним питанием

Расчет производится для сети с двусторонним питанием, по следующей программе, реализованной на языке FORTRAN. В данной программе произведен расчет кольцевой сети. Для определения сечения кабеля по экономической плотности тока произведен расчет эквивалентного тока. Определяются также точки потокораздела активной и реактивной мощностей для определения перетоков мощности в сети. На основании чего рассчитываются потери напряжения в линии. И производится расчет потерь напряжения в аварий ных режимах работы электрической сети (обрыв в начале линии и в конце):

Program fil4

Dimension PN(100),QN(100),L(100),UL(100),PP(100),QP(100),CAR(100)

Dimension Pnach(100),Qnach(100),Pkon(100),Qkon(100)

Dimension dP(100),dQ(100)

Real L

Open(5,file='is4.dat')

Open(6,file='rez4.dat')

Read(5,*)n,Udop,Unom,ej,Udopa

Read(5,*)(PN(i),QN(i),i=1,n)

Read(5,*)(l(i),i=1,n+1)

* car - Эквивалентныйток

* n - число нагрузок

* ej - экономическая плотность тока

*Определяем длины кольца

dl=0

do i=1,n+1

dl=dl+l(i)

enddo

Write(6,*)' Обьщяя длина кольца А В С'

Write(6,*)'dl=',dl,' м'

Pp(1)=0

Qp(1)=0