Расчет тока обратной последовательности

@CarterSS · Регистрация: 10.05.2014

Студворк — интернет-сервис помощи студентам

Добрый день.
Проблема такова, что необходимо посчитать ток обратной последовательности, зная токи трех фаз(токи измеряются устройством).
Почитал про симметричные составляющие, везде фигурирует данная формула, вычисляющая тот самый ток :

I2 = Ia + Ib *a^2 +Ic*a, (a - фазный множитель);

И вот тут посыпался, какие преобразования нужны для вычисления:
- Показательную форму тока представлять в виде уравнения переменного тока?
- Суммирование комплексных чисел, сложение векторов?
С ТОЭ не знаком, пару недель сижу в гугле, без помощи не обойтись.

@Hant · 05.04.2018, 12:58

Сообщение от CarterSS

С ТОЭ не знаком,

Зачем браться за то, чего не знаешь?

@CarterSS · 05.04.2018, 13:45 **[ТС]**

Берусь за то, чего не знаю, потому что задача ставится мне начальством. Ну и так же потому, что я всего лишь реализую алгоритм программы, я не электрик, но задачу нужно выполнить.
Зачем задавать вопросы, которые никак не помогут ответу?

@SSC · 06.04.2018, 08:16

Сообщение от CarterSS

Зачем задавать вопросы, которые никак не помогут ответу?

Просто человек не знакомый с ТОЭ при решении такой задачи наворотит всякой чуши.
Пример тому Ваше выражение

Сообщение от CarterSS

I2 = Ia + Ib *a^2 +Ic*a, (a - фазный множитель);

Но надеюсь операции с комплексными числами Вам знакомы (операции сложения и умножения).
Если и операции с комплексными числами Вам незнакомы, то до этой задачи Вы еще "не доросли".
Вот решение Вашей задачи на MATLABe (все переменные комплексные)

Matlab M

% исходные действующие значения токов
A=100;
B=150;
C=30;
j=sqrt(-1);
a=exp(j*2*pi/3);
B=B*a^2;
C=C*a;
% исходные векторные
A
B
C
% расчет нулевой, прямой и обратной для фазы А
A0=(A+B+C)/3
A1=(A+a*B+a^2*C)/3
A2=(A+a^2*B+a*C)/3
% расчет нулевой, прямой и обратной для фазы B и С
B0=A0; B1=A1*a^2; B2=A2*a;
C0=A0; C1=A1*a; C2=A2*a^2;
% контроль результатов должно совпасть с векторами A B C
AA=A0+A1+A2
BB=B0+B1+B2
CC=C0+C1+C2

@CarterSS · 06.04.2018, 12:51 **[ТС]**

Спасибо! Ваш ответ максимально понятен.
Освежил в памяти операции с комплексными числами, по вашему примеру реализовал расчет векторов, проверил, все действительно сходится, результаты совпадают с векторами.

@WH · 06.04.2018, 17:10

Хм, и я написал. Оказалось, что зря, уже все решили ))

Fortran

program rozlozhenie_I
implicit none
real :: Ia, Ib, Ic                  !Измеренные фазные токи
real :: ugol_a, ugol_b, ugol_c      !Углы измеренных фазных токов
real :: I1a, I1b, I1c               !Токи прямой последовательности
real :: ugol_1a, ugol_1b, ugol_1c   !Углы фазных токов прямой последовательности
real :: I2a, I2b, I2c               !Токи обратной последовательности
real :: ugol_2a, ugol_2b, ugol_2c   !Углы фазных токов обратной последовательности
real :: I0a, I0b, I0c               !Токи нулевой последовательности
real :: ugol_0                      !Угол нулевой последовательности
real, parameter :: pi=3.1415926     
 
complex :: Ia_k, Ib_k, Ic_k         !Измеренные токи в комплексной форме
complex :: I1a_k, I1b_k, I1c_k      !Токи прямой последовательности в комплексной форме
complex :: I2a_k, I2b_k, I2c_k      !Токи обратной последовательности в комплексной форме
complex :: I0a_k, I0b_k, I0c_k      !Токи фаз нулевой последовательности в комплексной форме
 
complex :: a
real :: b, modul
 
print*, "Разложение токов"
print *,
write(*,"(A)", advance = 'no') "Измеренная величина тока фазы А: "; read (*,*) Ia
write(*,"(A)", advance = 'no') "Угол фазы А: "; read (*,*) ugol_a
write(*,"(A)", advance = 'no') "Измеренная величина тока фазы B: "; read (*,*) Ib
write(*,"(A)", advance = 'no') "Угол фазы B: "; read (*,*) ugol_b
write(*,"(A)", advance = 'no') "Измеренная величина тока фазы C: "; read (*,*) Ic
write(*,"(A)", advance = 'no') "Угол фазы C: "; read (*,*) ugol_c
 
    modul = 1.0; b  = (2 * pi / 3.0) * (180 / pi)
    call perevod_v_koml (modul, b, a)
 
    !Переводим комплексный вид
    call perevod_v_koml (Ia, ugol_a, Ia_k)
    call perevod_v_koml (Ib, ugol_b, Ib_k)
    call perevod_v_koml (Ic, ugol_c, Ic_k)
 
    !Для фазы A
    I0a_k = (Ia_k + Ib_k + Ic_k) / 3.0                  !Нулевая последовательность
    I1a_k = (Ia_k + a * Ib_k + a * a * Ic_k) / 3.0      !Прямая последовательность
    I2a_k = (Ia_k + a * a * Ib_k + a * Ic_k) / 3.0      !Обратная последовательность
 
    I1b_k = a * a * I1a_k   !Для фазы В
    I2b_k = a * I2a_k
 
    I1c_k = a * I1a_k       !Для фазы С
    I2c_k = a * a * I2a_k
 
    !Реальные единицы
    call perevod_v_real (I0a_k, I0a, ugol_0)
    
    call perevod_v_real (I1a_k, I1a, ugol_1a)   !Фаза А
    call perevod_v_real (I2a_k, I2a, ugol_2a)
 
    call perevod_v_real (I1b_k, I1b, ugol_1b)   !Фаза В
    call perevod_v_real (I2b_k, I2b, ugol_2b)
 
    call perevod_v_real (I1c_k, I1c, ugol_1c)   !Фаза С
    call perevod_v_real (I2c_k, I2c, ugol_2c)
 
write (*,*)
write (*,"(A , F8.3)") "Ток прямой последовательности фазы А            = ", I1a
write (*,"(A , F8.3)") "Ток прямой последовательности фазы B            = ", I1b
write (*,"(A , F8.3)") "Ток прямой последовательности фазы C            = ", I1c
write (*,"(A , F8.3)") "Угол тока прямой последовательности фазы А      = ", ugol_1a
write (*,"(A , F8.3)") "Угол тока прямой последовательности фазы В      = ", ugol_1b
write (*,"(A , F8.3)") "Угол тока прямой последовательности фазы C      = ", ugol_1c
write (*,*)
write (*,"(A , F8.3)") "Ток обратной последовательности фазы А          = ", I2a
write (*,"(A , F8.3)") "Ток обратной последовательности фазы B          = ", I2b
write (*,"(A , F8.3)") "Ток обратной последовательности фазы C          = ", I2c
write (*,"(A , F8.3)") "Угол тока обратной последовательности фазы А    = ", ugol_2a
write (*,"(A , F8.3)") "Угол тока обратной последовательности фазы В    = ", ugol_2b
write (*,"(A , F8.3)") "Угол тока обратной последовательности фазы C    = ", ugol_2c
write (*,*)
write (*,"(A , F8.3)") "Ток нулевой последовательности любой из фаз     = ", I0a
write (*,"(A , F8.3)") "Угол тока нулевой последовательности            = ", ugol_0
 
end program rozlozhenie_I
 
subroutine perevod_v_koml (Z, Fi, Compl)
implicit none
real, intent(in) :: Z, Fi
complex, intent(out) :: Compl
real :: aa, ar, Fi1
real, parameter :: pi=3.1415926
    aa = Z * cos (Fi / (180 / pi))
    ar = Z * sin (Fi / (180 / pi))
    Compl  = cmplx (aa, ar)
end subroutine
 
subroutine perevod_v_real (Compl, Z, Fi)
implicit none
complex, intent(in):: Compl
real, intent(out) :: Z, Fi
real, parameter :: pi=3.1415926
real :: aa, ar
    Z = abs (Compl)
    aa = Compl
    ar = aimag (Compl)
    Fi = (180 / pi) * atan (ar / aa)
        if (aa < 0) then
        Fi=Fi-180.0
        end if
end subroutine perevod_v_real

@CarterSS · 07.04.2018, 15:41 **[ТС]**

Сообщение от WH

Хм, и я написал. Оказалось, что зря, уже все решили ))

Ничего не зря. Спасибо, просто превосходно!

@WH · 07.04.2018, 22:44

Код программы наспех и без подробной проверки написан был, как прообраз. Сейчас прогнал, в приведенном варианте ошибочка возникает при попадании вектора во 2-й квадрант (считает правильно, но вектор разворачивает не туда при переводе от расчетных данных в градусы), но главное не задана точка отсчета для пользователя. Вот в этом варианте (приложенный файл) правильно, векторы при вводе данных нужно вращать в "плюс", их вывод то же "в плюс" и вроде бы сейчас правильный. Но все равно потестить полезно на примерах, хотя бы на бумаге прикинуть. Подпрограммы оформил модулем, при желании можно сделать запись данных в файл. Для компиляции в винду, если вдруг, нужно ставить кодировку CP866, иначе кириллица превратится в крокозябры. Под винду могу компильнуть, но только на работе.

@GIPERSON · 24.05.2023, 11:42

WH,Здравствуйте. Подскажите по поводу razl_I.zip. В чем открывается и рассчитываются razl_I.f90? В какой программе?

@WH · 24.05.2023, 11:55

Это просто фортран код, причем старый устаревший вариант. Был переделан после. Если нужно посчитать, просто возьмите готовый скомпилированный файл, который прилагаю к этому сообщению. Файл для винды но есть и для linux если нужно. (то же какой-то старый исполнимый файл попался, но вроде считает и ладно).

@GIPERSON · 24.05.2023, 12:11

WH, просто хочу переделать весь расчёт в excel, не пойму строчки
modul = 1.0; b = (2 * pi / 3.0) * (180 / П)
call to_complex (modul, b, a)
И
Compl = cmplx (aa, ar)

@WH · 24.05.2023, 12:38

Вы думаете я помню, что когда то там писал?

(разбираться сейчас извините некогда). Тем более этот код, как я вижу сейчас, можно сократить в 2 раза, писал когда-то модули по незнанию, что можно было использовать прямые функции. Вам гораздо лучше будет просто найти литературу в нете по методу симметричных составляющих, откройте теорию на напишите по ней свои формулы в екселе, если вам в нем удобно.

@GIPERSON · 24.05.2023, 12:44

WH, Спасибо. Попробуем реализовать данный расчёт

@CarterSS 4 / 4 / 4 Регистрация: 10.05.2014 Сообщений: 60
		1
	Расчет тока обратной последовательности 05.04.2018, 12:02. Показов 11679. Ответов 12 Метки нет (Все метки) Добрый день. Проблема такова, что необходимо посчитать ток обратной последовательности, зная токи трех фаз(токи измеряются устройством). Почитал про симметричные составляющие, везде фигурирует данная формула, вычисляющая тот самый ток : I2 = Ia + Ib a^2 +Ica, (a - фазный множитель); И вот тут посыпался, какие преобразования нужны для вычисления: - Показательную форму тока представлять в виде уравнения переменного тока? - Суммирование комплексных чисел, сложение векторов? С ТОЭ не знаком, пару недель сижу в гугле, без помощи не обойтись. 0

@Hant 4179 / 2822 / 709 Регистрация: 16.09.2012 Сообщений: 11,485
	05.04.2018, 12:58	2
	Сообщение от CarterSS С ТОЭ не знаком, Зачем браться за то, чего не знаешь? 0

@CarterSS 4 / 4 / 4 Регистрация: 10.05.2014 Сообщений: 60
	05.04.2018, 13:45 [ТС]	3
	Берусь за то, чего не знаю, потому что задача ставится мне начальством. Ну и так же потому, что я всего лишь реализую алгоритм программы, я не электрик, но задачу нужно выполнить. Зачем задавать вопросы, которые никак не помогут ответу? 0

@CarterSS 4 / 4 / 4 Регистрация: 10.05.2014 Сообщений: 60
	06.04.2018, 12:51 [ТС]	5
	Спасибо! Ваш ответ максимально понятен. Освежил в памяти операции с комплексными числами, по вашему примеру реализовал расчет векторов, проверил, все действительно сходится, результаты совпадают с векторами. 0

@CarterSS 4 / 4 / 4 Регистрация: 10.05.2014 Сообщений: 60
	07.04.2018, 15:41 [ТС]	7
	Сообщение от WH Хм, и я написал. Оказалось, что зря, уже все решили )) Ничего не зря. Спасибо, просто превосходно! 0

@GIPERSON 0 / 0 / 0 Регистрация: 05.06.2020 Сообщений: 3
	24.05.2023, 11:42	9
	WH,Здравствуйте. Подскажите по поводу razl_I.zip. В чем открывается и рассчитываются razl_I.f90? В какой программе? 0

@GIPERSON 0 / 0 / 0 Регистрация: 05.06.2020 Сообщений: 3
	24.05.2023, 12:11	11
	WH, просто хочу переделать весь расчёт в excel, не пойму строчки modul = 1.0; b = (2 * pi / 3.0) * (180 / П) call to_complex (modul, b, a) И Compl = cmplx (aa, ar) 0

@WH 1567 / 799 / 186 Регистрация: 10.09.2013 Сообщений: 3,149 Записей в блоге: 3
	24.05.2023, 12:38	12
	Вы думаете я помню, что когда то там писал? (разбираться сейчас извините некогда). Тем более этот код, как я вижу сейчас, можно сократить в 2 раза, писал когда-то модули по незнанию, что можно было использовать прямые функции. Вам гораздо лучше будет просто найти литературу в нете по методу симметричных составляющих, откройте теорию на напишите по ней свои формулы в екселе, если вам в нем удобно. 1

@GIPERSON 0 / 0 / 0 Регистрация: 05.06.2020 Сообщений: 3
	24.05.2023, 12:44	13
	WH, Спасибо. Попробуем реализовать данный расчёт 0

Опции темы

Расчет тока обратной последовательности

Решение