Обоснование структуры и параметров системы компенсации реактивной мощности при наличии высших гармоник в напряжении и токе
Установлены зависимости перегрузки конденсаторных батарей от мощности компенсирующих устройств, мощности линейной и нелинейной нагрузок, спектрального состава тока и напряжения, параметров электрической сети, сопротивления дополнительных реакторов с учетом природы возникновения высших гармоник в электрической сети предприятия при варьировании мощности нагрузки в пределах от 4 до 40 МВА… Читать ещё >
Содержание
- 1. НАУЧНО-ТЕХНИЧЕСКИЕ ПРОБЛЕМЫ УЧЕТА ВЫСШИХ ГАРМОНИК В ЭЛЕКТРИЧЕСКИХ СЕТЯХ
- 1. 1. Влияние высших гармоник на работу электрооборудования
- 1. 2. Особенности возникновения высших гармоник в электрических сетях
- 1. 3. Минимизация высших гармоник на конденсаторных батареях
- 1. 4. Научно-технические задачи разработки методов уменьшения высших гармоник
- 1. 5. Цель и задачи научных исследований
- 1. 6. Выводы
- 2. МАТЕМАТИЧЕСКОЕ МОДЕЛИРОВАНИЕ ЭЛЕКТРОТЕХНИЧЕСКОГО КОМПЛЕКСА ПРИ НАЛИЧИИ ВЫСШИХ ГАРМОНИК
- 2. 1. Выбор объекта исследования
- 2. 2. Анализ существующих схем замещения для сетей, содержащих высшие гармоники
- 2. 3. Математическое моделирование электрической сети с КБ
- 2. 3. 1. Многомерный статистический анализ данных
- 2. 3. 1. 1. Математическая постановка задачи и методы ее реализации
- 2. 3. 1. 2. Определение значимых факторов для расчета коэффициента перегрузки компенсирующих устройств
- 2. 3. 2. Формирование схемы замещения в зависимости от факторов возникновения высших гармоник
- 2. 3. 1. Многомерный статистический анализ данных
- 2. 4. Расчет показателей надежности работы КБ
- 2. 5. Выводы
- 3. РАЦИОНАЛЬНЫЙ ВЫБОР МОЩНОСТИ КБ ПРИ НАЛИЧИИ ИСКАЖЕНИЙ
- 3. 1. Принципы выбора мощности КБ при наличии искажений
- 3. 2. Выбор мощности КБ с учетом коэффициента перегрузки
- 3. 3. Корректировка выбранных параметров компенсирующих устройств по коэффициенту мощности
- 3. 4. Алгоритм выбора мощности КБ
- 3. 5. Выводы
- 4. ВЫБОР ДОПОЛНИТЕЛЬНЫХ УСТРОЙСТВ ДЛЯ ОБЕСПЕЧЕНИЯ БЕЗОПАСНОЙ РАБОТЫ КБ
- 4. 1. Снижение влияния высших гармоник на КБ путем размещения в сети дополнительных реакторов
- 4. 2. Перегрузка на КБ в зависимости от соотношения линейной и нелинейной нагрузки
- 4. 3. Влияние сопротивления системы на перегрузку КБ
- 4. 4. Структура дополнительных устройств системы КРМ
- 4. 5. Выводы
- 5. СТРУКТУРА СИСТЕМЫ КРМ ПРИ НАЛИЧИИ ВЫСШИХ ГАРМОНИК. ПРАКТИЧЕСКОЕ ВНЕДРЕНИЕ РЕЗУЛЬТАТОВ
- 5. 1. Разработка структуры системы КРМ при наличии искажений
- 5. 2. Характеристика электротехнического комплекса предприятия
- ООО «Талосто-3000»
- 5. 3. Анализ работы электрической сети ООО «Талосто-3000» и выбор средств уменьшения перегрузок КБ
- 5. 4. Экспериментальные исследования и сравнение их с теоретическими результатами
- 5. 5. Оценка кратности снижения срока службы КБ
- 5. 6. Выводы
Обоснование структуры и параметров системы компенсации реактивной мощности при наличии высших гармоник в напряжении и токе (реферат, курсовая, диплом, контрольная)
В условиях дефицита и увеличения стоимости энергоресурсов, роста объемов производства и инфраструктуры городов все более актуальной становится проблема энергосбережения и в частности, экономии электроэнергии. Большинство электрических установок наряду с активной мощностью потребляют и реактивную мощность, которая расходуется на создание электромагнитных полей и является бесполезной для потребителя. Наличие реактивной мощности снижает качество электроэнергии, приводит к таким явлениям, как увеличение оплаты за электроэнергию, дополнительные потери и перегрев проводов, перегрузка подстанций, необходимость завышения мощности трансформаторов и сечения кабелей, просадки напряжения в электросети [43, 48].
Уменьшение в распределительных сетях балластных потоков реактивной мощности за счет ее компенсации у потребителя или на конечных подстанциях электросетевых компаний позволит:
— обеспечить подключение дополнительных или увеличить установленную мощность уже подключенных потребителей (при наличии в энергоузлах тех же объемов активной мощности и той же пропускной способности сетей);
— самому потребителю увеличить свои производственные мощности без увеличения тока в сетиулучшить технико-экономическую эффективность систем электроснабжения как электросетевых компаний, так и самих потребителей [55]- повысить устойчивость электроэнергетических систем, систем электроснабжения и нагрузки потребителей при снижении и провалах напряжения в сети.
Одним из источников реактивной мощности в нагрузочных узлах являются конденсаторные батареи (КБ) поперечного включения. Однако конденсаторы практически никогда не работают в строго номинальных условиях. Это объясняется тем, что напряжение электрической сети изменяется во времени в зависимости от изменения нагрузок, кроме того, формы кривых напряжений и токов в большей или меньшей степени могут отличаться от синусоидальных. Причиной этого является насыщение трансформаторов и главным образом наличие в сети других нелинейных элементов и мощных вентилей: выпрямителей и тиристорных преобразователей. Несинусоидальность кривой напряжения достигает в ряде случаев 10−15% [12]. В результате, значительно повышаются активные потери в электродвигателях и трансформаторах, происходит ускоренное старение изоляции кабелей, электрических машин и трансформаторов, снижаются качество и надежность работы систем автоматики, телемеханики и связи. В большинстве случаев оказывается невозможным эффективное использование конденсаторных батарей.
Значительное увеличение амплитуд гармоник тока, находящихся в резонансных и близких к резонансным режимах, приводит к тому, что действующие значения несинусоидального тока в цепи батарей конденсаторов значительно превышают допустимые. При определенных условиях ток КБ может не только быть выше номинального, но и в несколько раз его превосходить. Это приводит к перегрузке конденсаторов, коммутационной аппаратуры и в конечном итоге к их выходу из строя. Даже при соблюдении показателей качества электрической энергии, в частности, при соответствии коэффициента искажения синусоидальности кривой напряжения в сети предприятия нормативным значениям, перегрузка на конденсаторах токами высших гармоник может превышать допустимое значение. Это одна из причин, из-за которой столь актуален вопрос борьбы с высшими гармониками.
После издания приказа № 49 от 22 февраля 2007 г. Министерством промышленности и энергетики Российской Федерации, предусматривающего обязательную компенсацию реактивной со стороны промышленных предприятий, задача повышения эффективности функционирования установок компенсации реактивной мощности (КРМ) и обоснования структуры системы КРМ при наличии высших гармоник является особенно актуальной.
Основные результаты диссертационной работы заключаются в следующем:
1. Разработан алгоритм формирования схемы замещения сети для определения режимов работы и параметров конденсаторных установок при различных условиях возникновения высших гармоник.
2. Установлены зависимости перегрузки конденсаторных батарей от мощности компенсирующих устройств, мощности линейной и нелинейной нагрузок, спектрального состава тока и напряжения, параметров электрической сети, сопротивления дополнительных реакторов с учетом природы возникновения высших гармоник в электрической сети предприятия при варьировании мощности нагрузки в пределах от 4 до 40 МВА и сопротивления системы от 0,1 до 1 Ом. Показано, что при изменении параметров указанных факторов, максимум коэффициента перегрузки может смещаться в зависимости от спектра искажений в сторону больших или меньших частот.
3. Разработаны способы снижения влияния высших гармоник на установки КРМ, основанные на размещении в сети предприятия дополнительных реакторов (патент РФ № 2 416 853), а также изменении мощности КБ в зависимости от параметров нагрузки, сети и спектрального состава тока и напряжения на конденсаторах.
4. Разработана структура системы КРМ при наличии высших гармоник, возникающих как со стороны внешнего источника относительно ввода предприятия, так и со стороны самого предприятия. Структура содержит: исследование схемы электрической сети с определением диапазона возможного варьирования нагрузки предприятияисследование условий возникновения искажений в напряжении и токе и их спектральный анализпоследовательность выбора средств компенсации высших гармоник с усложнением конфигурации системы компенсации реактивной мощности.
5. Эффективность выбора структуры системы КРМ при наличии высших гармоник в напряжении и токе подтверждена экспериментальными исследованиями на промышленном предприятии, содержащем нелинейную нагрузку и конденсаторные установки КРМ. Согласно структуре был выбран дополнительный реактор с сопротивлением 0,015 Ом, подключенный на входе предприятия. При этом коэффициент перегрузки КБ снизился с 70% до допустимого значения, равного 20%. Акт проведения опытно-промышленных испытаний представлен в приложении 4.
ЗАКЛЮЧЕНИЕ
.
В работе дано решение научной задачи, заключающейся в разработке структуры системы КРМ при различных условиях возникновения гармонических искажений, обеспечивающей соответствие величины коэффициента перегрузки КБ нормативному значению и повышение коэффициента мощности в сети при условии обеспечения электромагнитной совместимости работы электротехнического комплекса.
Список литературы
- Абрамович Б.Н., Тарасов Д. М., Устинов Д. А., Сычев Ю. А. Проблемы контроля и компенсации гармонических искажений в сетях предприятий цветной металлургии // Цветные металлы. 2008. — № 9. — С.90−94.
- Абрамович Б.Н., Полищук В. В. Надежность систем электроснабжения: Учебное пособие / СПГГИ. СПб, 1997. — 37 с.
- Абрамович Б.Н., Устинов Д. А. Электропривод и электроснабжение горных предприятий: Учебное пособие / СПГГИ. СПб, 2004. — 84 с.
- Агунов A.B. Статический компенсатор неактивных составляющих мощности с полной компенсацией гармонических составляющих тока нагрузки // Электротехника. 2003. — № 2. — С.47−50.
- Александров Г. Н. Статический тиристорный компенсатор на основе управляемого шунтирующего реактора трансформаторного типа // Электричество. 2003. — № 2. — С.38−46.
- Александров Г. Н. Управляемые реакторы: принцип действия, основные характеристики и перспективы использования в электрических сетях // Электротехника. 2007. — № 4. — С. 14−22.
- Арриллага Дж., Бредли Б., Боджср П. Гармоники в электрических системах. М.: Энергоатомиздат, 1990. — 320 с.
- Асафов Вагиф Назир оглы Разработка секционированной конденсаторной установки для сети горного предприятия с вентильной нагрузкой: дис. на соискание ученой степ. канд. техн. наук: 05.09.03. СПб.: Изд-во СПбГТУ, 1994.
- Ахлюстин В.К. Электрификация обогатительных фабрик. М.: Недра, 1973.-424 с.
- Бабаев С.С. Способ коррекции электрических сигналов при искажениях напряжения сети // Электричество. 2009. — № 3. — С.20−23.
- Багаутинов Г. А., Марков Ю. А. Электропривод и электрификация приисков. М.: Недра, 1989. — 303 с.
- Баркан Я.Д. Автоматическое управление режимом батарей конденсаторов. М.: Энергия, 1978. — 112 с.
- Бартеньев О.В. Фортран для профессионалов. Математическая библиотека IMSL. М.: Диалог-МИФИ, 2000. — 372 с.
- Блантер С.Г., Суд И.И. Электрооборудование нефтяной и газовой промышленности. -М.: Недра, 1980. -478 с.
- Боровиков В.П. Statistica. Искусство анализа данных на компьютере. 2-е изд. Спб: Питер, 2003. — 688 с.
- Буреева H.H. Многомерный статистический анализ с использованием ППП «STATISTICA». Нижний Новгород, 2007. — 112 с.
- Бурман А.П., Виссарионов П. А. Основы современной энергетики. М.: Изд-во МЭИ, 2003. — 454 с.
- Волков A.B., Волков В. А. Компенсация мощности искажений и реактивной мощности посредством активного фильтра с прогнозируемым релейным управлением // Электротехника. 2008. — № 3. — С.2−10.
- Глухарев Ю.Д., Замышляев В. Ф. Техническое обслуживание и ремонт горного оборудования. М.: Издательский центр Академия, 2003. — 400 с.
- Глушков В.М., Грибин В. П. Компенсация реактивной мощности. М.: Энергия, 1975.- 104 с.
- Горбачёв Г. Н. Промышленная электроника. — М.: Энергоатомиздат, 1988. -320 с.
- ГОСТ 13 109–97 Электрическая энергия. Совместимость технических средств электромагнитная. Нормы качества электрической энергии в системах электроснабжения общего назначения.
- ГОСТ 1282–79 Конденсаторы для повышения коэффициента мощности электроустановок переменного тока частоты 50 и 60 Гц.
- Готман В.И., Маркман Г. З. Задачи обследования системы компенсации реактивной мощности // Промышленная энергетика. 2006. — № 8. — С.50−55.
- Грейсух М.В., Лазарев С. С. Расчеты по электроснабжению промышленных предприятий. М.: Энергия 1977. — 312 с.
- Дементьев Ю.А., Кочкин В. И., Мельников А. Г. Применение управляемых статических компенсирующих устройств в электрических сетях // Электричество. 2003. — № 9. — С.2−10.
- Дубров A.M., Мхитарян B.C., Трошин Л. И. Многомерные статистические методы и основы эконометрики. М.: МЭСИ, 2002. — 79 с.
- Жак Куро Современные технологии повышения качества электроэнергии при ее передаче и распределении // Новости электротехники. 2005. — № 1.
- Жежеленко И.В., Саенко Ю. Л. Показатели качества электроэнергии и их контроль на промышленных предприятиях. 3-е изд., перераб. и доп. — М.: Энергоатомиздат, 2000. 252 с.
- Жежеленко И.В. Высшие гармоники в системах электроснабжения промпредприятий. 2-е изд., перераб. и доп. — М.: Энергоатомиздат, 1986. — 168 с.
- Жежеленко И.В., Рабинович M.JL, Божко В. М. Качество электроэнергии на промышленных предприятиях. К.: Техника, 1981. — 160 с.
- Железко Ю.С. Компенсация реактивной мощности и повышение качества электроэнергии. М.: Энергоатомиздат, 1985. — 224 с.
- Железко Ю.С. Компенсация реактивной мощности в сложных электрических системах. М.: Энергоатомиздат, 1981. — 200 с.
- Железко Ю.С. Выбор мероприятий по снижению потерь электроэнергии в электрических сетях. М.: Энергоатомиздат, 1989. — 176 с.
- Зевеке Г. В. Основы теории цепей. 4-е изд., перераб. — М.: Энергия, 1975. -752 с.
- Ивакин В.Н., Магницкий A.A. Устройства продольной компенсации на полностью управляемых силовых полупроводниковых приборах // Электротехника. 2008. — № 10. — С.47−56.
- Ивакин В.Н., Магницкий A.A., Шульга Р. Н. Применение установок тиристорно-управляемой продольной компенсации на линиях электропередачи переменного тока // Электротехника. 2006. — № 9. — С.42−49.
- Ильяшов В.П. Конденсаторные установки промышленных предприятий. -2-е изд., перераб. и доп. М.: Энергоатомиздат, 1983. — 152 с.
- Иньков Ю.М., Климаш B.C., Светлаков Д. П. Компенсаторы неактивной энергии со стабилизацией напряжения трансформаторных подстанций // Электротехника. 2007. — № 7. — С.34−37.
- Калантаров П.Л., Цейтлин Л.А Расчет индуктивностей. Л.: Энергоатомиздат, 1986. — 488 с.
- Калинина В.Н., Соловьев В. И. Введение в многомерный статистический анализ: Учебное пособие / ГУУ. М., 2003. — 66 с.
- Каминский Е.А. Звезда, треугольник, зигзаг. М.: Энергоатомиздат, 1984. -104 с.
- Карпов Ф.Ф. Компенсация реактивной мощности в распределительных сетях промпредприятий. М.: Энергия, 1975. — 184 с.
- Кириенко В.П., Слепченков М. Н. Комплексное устройство компенсации реактивной мощности и мощности искажения в системах питания с управляемыми выпрямителями // Электричество. 2006. — № 11.- С.33−40.
- Кирилловский B.C. Энергосбережение и компенсация реактивной мощности на шахтах // Горное оборудование и электромеханика. 2006. — № 12. — С.37−39.
- Князевский Б.А. Электроснабжение промышленных предприятий. М.: Высш. шк., 1986.-400 с.
- Компенсация реактивной мощности ключ к снижению энергопотребления // Технологии энергосбережения Сибири. — 2009. — С.2−13.
- Константинов Б.А., Зайцев Г. З. Компенсация реактивной мощности. Л.: Энергия, 1976. — 104 с.
- Конюхова Е.А. Электроснабжение объектов. М.: Академия, 2004. — 320 с.
- Корнилов Г. П., Храмшин Т. Р. Современные способы компенсации реактивной мощности крупных металлургических приводов // Электромеханика. 2009. — № 1. — С.28−31.
- Кумаков Ю.В. Инверторы напряжения со ступенчатой модуляцией и активная фильтрация высших гармоник // Новости электротехники. 2005. — № 6.
- Кучинский Г. С., Назаров Н. И., Назарова Г. Т., Переселенцев И. Ф. Силовые электрические конденсаторы. М.: Энергия, 1975. — 248 с.
- Кучумов Л.А., Спиридонова Л. В. Потери мощности в электрических сетях и их взаимосвязь с качеством электроэнергии. Л.: Изд-во J Ii ЛИ, 1985. — 92 с.
- Лурье М.С., Лурье О. М. Применение программы MATLAB при изучении курса электротехники. Красноярск: СибГТУ, 2006. — 208 с.
- Максимов A.B., Паули В. К. Компенсация реактивной мощности -актуальная задача энергосбережения // Электро. 2009. — № 3. — С.7−10.
- Минин Г. П. Несинусоидальные токи и их измерения. М.: Энергия, 1979. -112 с.
- Михайлов В.В. Надежность электроснабжения промышленных предприятий. М: Энергоатомиздат, 1992. — 150 с.
- Михалков A.B. Что нужно знать о регулировании напряжения. М.: Энергия, 1971. — 56 с.
- Никифоров И.А. Статистический анализ геологических данных. -Оренбург: ОГУ, 2010.- 170 с.
- Озерной М.И. Электрооборудование и электроснабжение подземных разработок угольных шахт. М.: Недра, 1975. — 448 с.
- Патент 2 354 025 РФ. Способ компенсации высших гармоник и коррекции коэффициента мощности сети / Абрамович Б. Н., Полищук В. В., Сычев Ю.А.- Санкт-Петербургский государственный, горный ин-т. — Заяв. 04.05.2008- Опубл. 27.04.2009, Бюл. № 12.
- Плющ Б.М., Ройтман М. В., Саркисян В. О. Электрооборудование нефтяных и газовых промыслов. М.: Недра, 1965. — 312 с.
- Пронин М.В. Активные фильтры высших гармоник. Направления развития // Новости электротехники. 2006. — № 2.
- Розанов Ю.К., Гринберг Р. П. Гибридные фильтры для снижения несинусоидальности тока и напряжения в системах электроснабжения // Электротехника. 2006. — № 10. — С. 55−60.
- Самохин Ф.И., Маврицын A.M., Бухтояров В. Ф. Электрооборудование и электроснабжение открытых горных работ. М.: Недра, 1988. — 367 с.
- Сапунов М.В. Вопросы качества электрической энергии // Новости электротехники. 2001. — № 4.
- Скамьин А.Н. Повышение эффективности функционирования конденсаторных батарей в электрической сети горного предприятия // Сб. Записки Горного института. 2011. — том 189. — С. 107−110.
- Тамазов А.И. Несимметрия токов и напряжений, вызываемая однофазными тяговыми нагрузками. М.: Изд-во «Транспорт», 1965. — 234 с.
- Халафян A.A. Статистический анализ данных. 3-е изд. М.: ООО «Бином-пресс», 2007. — 512 с.
- Хачатурян В.А. Управление электроснабжением нефтеперерабаты-вающих предприятий в условиях массового применения регулируемого электропривода. Спб, 2002. — 64 с.
- Чаплыгин Е.Е., Ковырзина О. С. Компенсация неактивных составляющих полной мощности дуговых сталеплавильных печей // Электричество. 2009. -№ 11. — С.30−37.
- Черепанов В.В. Методика анализа несинусоидальных режимов систем электроснабжения промышленных предприятий // Электротехника. 1989. -№ 17.
- Черных И.В. Моделирование электротехнических устройств в MATLAB, SimPowerSystems, Simulink. СПб.: Изд-во ДМК Пресс, 2008. — 290 с.
- Чиликин М.Г., Сандлер A.C. Общий курс электропривода. М.: Недра, 1980.-575 с.
- Шидловский А.К., Кузнецов В. Г. Повышение качества энергии в электрических сетях. Киев: Наук, думка, 1985. — 268 с.
- Шклярский ЯЗ. Методы и средства повышения эффективности управления потоками реактивной мощности электротехнических комплексов горнодобывающих предприятий: дис. на соискание ученой степ. докт. техн. наук: 05.09.03. СПб.: Изд-во СПбГТУ, 2004.
- Шклярский ЯЗ. Управление потоками реактивной мощности на горных предприятиях. СПб.: Изд-во СПбГТУ, 2002. — 94 с.
- Шклярский Я.Э., Ситников Д. А., Скамьин А. Н. Уменьшение влияния высших гармоник на работу электротехнического комплекса горного предприятия // Сб. Записки Горного института. 2008. — том 178. — С. 162−165.
- Шклярский Я.Э., Скамьин А. Н. Способы уменьшения влияния высших гармоник на работу электрооборудования // Сб. Записки Горного института. -2011.-том 189. -С.121−124.
- IEEE Std 519−1992 IEEE Recommended Practices and Requirements for Harmonic Control in Electrical Power Systems, 1992.
- David Chapman Harmonics: Causes and effects // Power quality application guide, March 2001. 13p.
- Mark Stephens Power quality in continuous manufacturing // EPRI Solutions, winter 2006. 2p.
- Skamyin A.N. Automatic neutralization of high harmonics in electric circuits of metallurgical enterprises / Y.E. Shklyarsky, A.N. Skamyin, V.N. Lebedik, A.I. Mikheyev // «CIS Iron and Steel Review». Издательский дом «Руда и металлы». — 2008. -р.38−40.
- Stefan Fassbinder, Deutsches Kupferinstitut Harmonics: Passive filters // Power quality application guide, June 2003. 9p.1. Параметры схемы замещения
- Выборка наблюдений для проведения регрессионного анализа
- Программа для выбора мощности КБ
- PROGRAM SPL USE MSIMSLMS IMPLICIT NONE
- TEGER: NX, NY, NZ, NXV, NYV, NZV
- TEGERSARAMETER: XORD=3,YORD=3,ZORD=3
- REAL, DIMENSION (:), ALLOCATABLE: X (Y, Z, XKN, YKN, ZKN, XV, YV, ZV
- REAL, DIMENSION (:), ALLOCATABLE: U, C, V
- TEGER: I, J, К REAL: HX, HY, HZ
- OPEN (2,FILE='C:MSDEVFPS3.TEXTdannie3.dat', POSITION-REWIND')1. CALL NOREAD (2,'=')1. READ (2,*) NX1. CALL NOREAD (2,'=')1. READ (2,*) NY1. CALL NOREAD (2,'-)1. READ (2,*) NZ
- AI.LOCATE (X (NX)>Y (NY), Z (NZ), XKN (NX+XORD), YKN (NY^YORD), ZKN (NZtZO, NZ))1. ВВОД ИСХОДНЫХ ДАННЫХ
- CALL N0READ (2,'=') READ (2,*) (X (I), I=1,NX) CALL NOREAD (2,'=') READ (2,*) (Y (J), J=1,NY) CALL NOREAD (2,'=') READ (2,*) (Z (K), K=1,NZ) CALL NOREAD (2,'=')
- READ (2,*) (((U (I, J, K), J=1,NY), I=1,NX), K=1,NZ) ! СЧЕТ
- CALL BSNAK (NX, X, XORD, XKN) CALL BSNAK (NY, Y, YORD, YKN) CALL BSNAK (NZ, Z, ZORD, ZKN)
- CALL BS3IN (NX!X, NY, Y, NZ, Z) U, NX, NY, XORD, YORD, ZORD, XKN, YKN, ZKN, C)1. ВЫВОД РЕЗУЛЬТАТОВ
- CALL NOREAD (2,'=') RE AD (2,*) NXV CALL NOREAD (2,'=') READ (2,*) NYV CALL NOREAD (2,'=') READ (2,*) NZV
- ALLOCATE (XV (NXV), YV (NYV), ZV (NZV), V (NXV, NYV, NZV))1. HX=(X (NX)-X (1))/(NXV-1)1. HY=(Y (NY)-Y (1))/(NYV -1)
- HZ=(Z (N Z)-Z (1))/(NZ V-1)1. DO 1=1,NXV
- XV (I)=X (1)+(I-1)*HX END DO DO J=1,NYV
- YV (J)=Y (1)+(J-1) *H Y END DO DO K=1,NZV
- ZV (K)=Z (1)+(K-1)*HZ END DO CALL
- BS3GD (0,0,0,NXV, XV, iT^, YV, NZV, Z^XORD, YORD, ZORD,^^ PRINT *, C
- OPEN (3, FILE='C:MSDEVFPS 3. ТЕХТЛЗ vivod. dat', STATUS-REPLACE') WRITE (3/(13X, A,14X, A, 1 OX, A, 16X, A)') 'X','Y','Z','PER' DO 1= 1, NX V DO J=1,NYV DO K=1,NZV IF (V (I, J, K)<1.3) THEN
- WRITE (3,'(4F15.3)')XV (I), YV (J)1ZV (K), V (I, J, K) END IF END DO END DO END DO
- OPEN (4,FILE-C:MSDEVFPSf33TEXT3vivodl.dat', STATUS-REPLACE')
- WRITE (4,'(1 OX, А)') 'ИСХОДНЫЕ ДАННЫЕ' WRITE (4,'(1 OX, A,5X50 °F 10.1)') 'XY',(Y (J), J=1, NY) DO 1=1,NX
- WMTE (4,'(5X, F11.3,50F10.3)') X (I),(U (I, J, K), J=1,NY) END DO
- WRITE (4,'(1 OX, А)') 'РЕЗУЛЬТАТЫ СЧЕТА' WRITE (4,'(1 OX, A,5X50 °F 10.1)') 'XY',(YV (J), J= 1, NYV) DO 1=1,NXV
- WRITE (4,'(5X, F11.3,50F10.3)') XV (I),(V (I, J, K), J=1,NYV) END DO
- CLOSE (2) CLOSE (3) CLOSE (4)
- DEALLOCATE (X, Y, Z, XV, YV, ZV, XKN, YKN, ZKN, U, C)
- CONTAINS SUBROUTINE Noread (Unit, CH) INTEGER, INTENT (IN): Unit CHARACTER, INTENT (IN): CH CHARACTER: С DO
- READ (Unit,'(A)', ADVANCE=rNO', EOR= 10) C- IF (C=CH) EXIT END DO END SUBROUTINE Noread END PROGRAM SPL