Технологический процесс производства биметалла
Теоретические основы сварки давлением и исследования прокатки биметалла. Исследование условия сварки слоев. Описание алгоритма программы расчета поля скоростей при прокатке биметалла с учетом взаимодействия слоев. Составление калькуляции себестоимости.
| Рубрика | Производство и технологии |
| Вид | дипломная работа |
| Язык | русский |
| Дата добавления | 07.11.2011 |
| Размер файла | 952,5 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
Ом•см.
4 Определение значений повышающих коэффициентов для стержневого заземлителя для I климатической зоны и для полосового заземлителя . (при расчетах брались рекомендованные значения повышающих коэффициентов по верхнему пределу, т.е. при самых неблагоприятных условиях для данной зоны).
5 Вычисление расчетного удельного сопротивления грунта для труб
Ом•см.
6 Вычисление расчетного удельного сопротивления грунта для соединительной полосы
Ом•см.
7 Определение сопротивления растекания тока одной трубы
Ом.
8 Вычисление количества труб, которые необходимо забить в грунт, без учета коэффициента экранирования
труб.
9 Определение коэффициента экранирования при расположении труб по четырехугольному контуру и , =0,43.
10 Вычисление необходимого количества труб с учетом коэффициента экранирования
труб.
11 Определение расчетного сопротивления трубчатых заземлителей без учета соединяющей полосы
Ом.
12 Вычисление длины соединяющей полосы при условии, что трубы расположены по четырехугольному контуру
см.
13 Определение сопротивления растеканию тока соединяющей полосы
Ом.
Ом.
14 Определение коэффициента экранирования соединяющей полосы при расположении труб по четырехугольному контуру и при ,
15 Вычисление расчетного сопротивления соединяющей полосы
Ом.
16 Вычисление общего расчетного сопротивления заземляющего устройства (труб и соединяющей полосы)
Ом.
Вывод: Полученное расчетное сопротивление удовлетворяет требованиям ПУЭ, т.е. =4 Ом.
5. Охрана окружающей среды
Расширение области применения компьютерной техники, ее быстрое моральное старение остро ставит вопрос о необходимости разработки новых технологий переработки компьютерного лома.
До недавнего времени при утилизации старых компьютеров происходила их разборка на фракции: металлы, пластмассы, стекло, провода, штекеры. Вторичные ресурсы металлов складываются из лома (3-4%) и отходов (57%). Из одной тонны компьютерного лома получают до 200 кг меди, 480 кг железа и нержавеющей стали, 32 кг алюминия, 3 кг серебра, 1 кг золота и 300 г палладия.
В настоящее время разработаны следующие методы переработки компьютерного лома и защиты литосферы от него:
сортировка печатных плат по доминирующим материалам;
дробление и измельчение;
гранулирование, в отдельных случаях сепарация;
обжиг полученной массы для удаления сгорающих компонент;
расплавление полученной массы, рафинирование;
прецизионное извлечение отдельных металлов;
создание экологических схем переработки компьютерного лома;
создание экологически чистых компьютеров.
В последнее время приняты радикальные меры по улучшению разделки, сортировки и использования лома и отходов цветных металлов. Важной задачей является переработка медных проводов и кабелей, так как более одной трети меди идет на производство проводов.
Лучшим способом разделки проводов можно считать отделение изоляции от проволоки механическим способом. С помощью грануляторов специальной конструкции удовлетворительно решена проблемы отделения термоплавкой и резиновой изоляции. Установка пригодна для переработки проволоки, изолированной термопластом и бумагой. Установка не пригодна для некоторых типов проводов, изолированных хлопчатобумажной тканью, для кабелей со свинцовой оболочкой и для всех сортов изоляции, которая прилипает к проводу так, что не отделяется от металла даже при очень тонкой грануляции. При переработке проводов, у которых разделение изоляция и меди осуществляется удовлетворительно и почти без потерь получается термопласт, последний может служить сырьем для изготовления менее ответственных деталей.
Если между проводами, изолированными термопластом, есть изоляция из ткани, ее можно удалить из смеси кусков меди и изоляции с помощью отсасывающего устройства. Эта установка закрыта и механизирована, требует минимального обслуживания и обеспечивает производительность - 500 тонн изолированной проволоки в год. При работе установки не загрязняется атмосфера, технология экономически более выгодна, чем обжиг изоляции в печах.
Переработку промышленных отходов производят на специальных полигонах, создаваемых в соответствии с требованиями СНиП 2.01.28-85 и предназначенных для централизованного сбора обезвреживания и захоронения токсичных отходов промышленных предприятий, НИИ и учреждений.
При всех существующих способах переработки компьютерного лома необходимы новые, более совершенные, экологически чистые методы.
6. Экономический раздел
6.1 Технико-экономическое обоснование дипломной НИР
В настоящее время большую часть плакируемых изделий получают при помощи сварки прокаткой. Плакируемым слоем может служить практически любой металл. В большинстве случаев отладка технологии производства связана с большими затратами на эксперименты. Данная дипломная работа позволяет избежать большого числа экспериментов, так как позволяет прогнозировать качество получаемого сварного соединения при помощи одного эксперимента на определенной паре металлов или сплавов не зависимо от соотношения толщин плакируемого и основного слоя.
6.2 Калькуляционные статьи расходов
6.2.1 Материалы, покупные изделия и полуфабрикаты
На эту статью относится стоимость сырья, основных материалов, комплектующих изделий, полуфабрикатов.
Материалы оцениваются по действующим оптовым ценам согласно прейскурантов с обязательным учетом транспортно-заготовительных расходов. Величина транспортно-заготовительных расходов предварительно рассчитывается бухгалтерией в виде укрупненного процента начисления к стоимости материалов и обычно составляет 5-10% от стоимости всех материалов.
Затраты на сырье, материалы и полуфабрикаты могут быть рассчитаны по формуле
где: - норма расходов материала, кг;
- цена материалов, руб/кг;
- коэффициент транспортно-заготовительных расходов;
- масса возвратных отходов, кг;
- цена отходов, руб/кг.
Расчет произведенных по данной статье расходов приведен в таблице 7.
Таблица 7 - Расчет материальных затрат на выполнение дипломной НИР
|
Наименование материала и отходов |
Единица измерения |
Количество |
Цена |
Сумма |
|
|
1. Бумага |
500 листов |
3 |
100 |
300 |
|
|
2. Картридж для принтера |
Штука |
1 |
1700 |
1700 |
|
|
3. Ручка |
Штука |
10 |
5 |
50 |
|
|
4. Книги |
Штука |
5 |
500 |
2500 |
|
|
Итого материальных затрат |
4550 руб. |
||||
|
Транспортно-заготовительные расходы |
455 руб. |
||||
|
ИТОГО |
5005 руб. |
Амортизацию принимаем как 25% от стоимости основных фондов, она равна 1251,25 руб.
6.2.2 Затраты на заработную плату научно-технического персонала
В калькуляционных расчетах эта статья занимает важное место, т.к. в сумме затрат на тему составляет обычно 30-40 % и более. В расчете учитывается заработная плата только исполнителей, непосредственно занятых выполнением дипломной работы: зарплата руководителя темы и консультантов и зарплата (стипендия) студента-исполнителя темы. Затраты на оплату труда руководителя и консультантов рассчитываются, исходя из количества часов, затраченных ими на руководство и консультации, а также стоимость одного учебного часа.
Для расчета заработной платы исполнителя используется следующая формула:
где - заработная плата i-го исполнителя, руб.;
- месячный оклад исполнителя, руб.;
- количество фактически затраченного времени.
Заработная плата исполнителя дипломной работы определяется суммой стипендии, начисленной за время дипломирования.
Доля дополнительной заработной платы руководителя работы и консультантов для МИСиС составляет 20% от основной заработной платы. Отчисления на социальные нужды составляет 25,6 %.
Результаты расчета заработной платы приведены в таблице 8.
Таблица 8 - Заработная плата исполнителей
|
Должность |
Месячный оклад, руб. |
Фактически отработанное время, часы |
Основная зарплата, руб. |
Дополнительная зарплата, руб. |
|
|
Студент-исполнитель темы |
1200 |
880 |
4800 |
0 |
|
|
Руководитель работы |
15000 |
25 |
9689,92 |
1937,98 |
|
|
Консультант по экономике производства |
8000 |
3 |
155,3 |
31,06 |
|
|
Консультант по БЖД |
8000 |
3 |
155,3 |
31,06 |
|
|
Консультант по охране окружающей среды |
8000 |
3 |
155,3 |
31,06 |
|
|
Консультант по стандартизации и метрологии |
15000 |
3 |
290,7 |
58,14 |
|
|
Общая сумма заработной платы, руб.17335,82 |
|||||
|
Отчисления на социальное страхование, руб.4437,97 |
|||||
|
ИТОГО заработная плата с отчислениями, руб.21773,79 |
6.2.3 Накладные расходы
Величина накладных расходов исчисляется в процентах к заработной плате производственного персонала, занятого выполнением научной тематики института как отношение итога сметы накладных расходов на планируемый год к фонду заработной платы производственного персонала.
Планируют, учитывают и контролируют накладные расходы плановый отдел и бухгалтерия института. Величина накладных расходов в МИСиС по работам, выполняемым в рамках НИО, составляет в последние годы ~60 %.
Утвержденный процент накладных расходов является обязательным при плановых расчетах.
Рн = (Осн. ЗП + Доп. ЗП) Ч60%=17335,82Ч0,6=10401,49 руб.
6.2.4 Затраты на электроэнергию
Затраты на освещение, отопление и т.д. учитываются в накладных расходах. Расчет затрат на электроэнергию для работы с ПЭВМ производится по формуле:
где - затраты на электроэнергию, руб.;
- мощность электроприбора по паспорту, кВт;
- коэффициент использования мощности ()
- время использования оборудования, ч;
- цена одного кВт/ч электроэнергии, руб.
Стоимость одного кВт/ч - 2,08 руб. Результаты расчета затрат на электроэнергию: мощность ПЭВМ - 0,1 кВт; время использования ПЭВМ - 550 ч; сумма затрат на электроэнергию - 114,4 руб.
6.3 Составление калькуляции себестоимости дипломной работы
Плановые калькуляции составляются на основе нормативов, трудовых, материальных и финансовых затрат по каждой из калькулируемых статей. При отсутствии нормативов затраты могут быть определены по аналогии с предыдущими работами подобного типа с учетом коэффициентов, характеризующих степень изменения значения калькуляционных статей по сравнению с работами - аналогами. Эти коэффициенты определяются путем экспертной оценки компетентными лицами (руководитель темы, консультант, работники планового отдела и т.д.).
Отчетная калькуляция рассчитывается после окончания работ по фактическим затратам. Используя ранее рассчитанные статьи затрат, рассчитывается себестоимость дипломной работы. Результаты расчетов оформлены в виде таблицы 9.
Таблица 9 - Калькуляция себестоимости дипломной НИР
|
Статьи затрат |
Сумма, руб. |
Отклонение, руб. |
Фактические затраты, % к общей стоимости работы |
||
|
план |
отчет |
||||
|
Материалы, покупные изделия, полуфабрикаты |
6256,25 |
6512,00 |
255,75 |
15,45 |
|
|
Основная зарплата производственного персонала |
15246,52 |
15246,52 |
0 |
36,18 |
|
|
Дополнительная зарплата производственного персонала |
2089,3 |
3285,5 |
1196,2 |
7,8 |
|
|
Отчисления на социальное страхование |
4437,97 |
4437,97 |
0 |
10,53 |
|
|
Затраты на электроэнергию |
114,4 |
126,69 |
12,29 |
0,3 |
|
|
Накладные расходы |
10401,49 |
12536,58 |
2135,09 |
29,75 |
|
|
ИТОГО себестоимость НИР |
38545,93 |
42145,26 |
3599,33 |
В первой статье причиной отклонения фактических затрат от плановых является перерасход материала, в третьей статье - увеличение времени работы консультантов по дипломному проектированию, в статье накладных расходов - несовпадение планового процента с фактическим.
Путем возможной экономии средств является более рациональное использование материалов, покупных изделий и уменьшение накладных расходов.
6.4 Технико-экономический эффект дипломной НИР
В данной работе была разработана математическая модель адекватно отражающая реологию процесса прокатки биметаллических изделий, также был проведен эксперимент на сплавах АД0 и АД31. В настоящее время практическое использование полученных результатов не проводилось, таким образом непосредственный экономический эффект для данной работы не рассчитывался. Однако, можно определить договорную цену продажи полученных результатов по следующей формуле:
Цд=С (1 + РН),
где Цд - договорная цена в руб.;
С - плановая себестоимость НИР, руб.;
РН - уровень рентабельности научной организации, где выполняется исследование (для МИСиС - 20 %).
Таким образом. договорная цена составляет 50574,32 руб.
Прибыль составляет выручка за вычетом себестоимости НИР. В этом случае она составит 50574,32 - 42145,26 = 8429,06 руб. Срок окупаемости Ток= (ОМ+ВМ) /П = 6512/8429,06 =0,77 лет, что меньше нормативного срока (6,67 года).
Так как коэффициент экономической эффективности Е=П/ (ОМ+ВМ) =1,29 больше нормативного 0,15, и срок окупаемости меньше нормативного, то НИР можно считать экономически эффективной.
6.5 Построение сетевых графиков
Под сетевым графиком (сетевой моделью) понимают граф, отображающий технологическую взаимосвязь между работами.
Начальная информация для составления сетевого графика должна содержать перечень всех работ с указанием технологической последовательности их выполнения.
Одна из основных количественных характеристик каждой работы - ее продолжительность - является случайной величиной, распределенной в определенном интервале времени.
Расчет времени проводили с использованием сетевого планирования. Исходные данные для расчета сетевого графика представлены в таблице 10.
Таблица 10 - Исходные данные для построения и расчета сетевого графика выполнения НИР
|
№ работы |
Тема: "Исследование условий сварки биметаллических полос" |
№№ предшествующих работ |
Временные оценки в неделях |
Количество исполнителей |
||
|
Содержание работ |
наимень-шая, a |
наиболь-шая, b |
||||
|
1 |
Составление литературного обзора. Разработка методики исследования |
- |
3 |
5 |
1 |
|
|
2 |
Составление технико-экономического обоснования и расчет затрат на выполнение темы |
1 |
2 |
3 |
1 |
|
|
3 |
Определение экономической эффективности исследования |
2 |
2 |
3 |
1 |
|
|
4 |
Составление программы на языке QBasic |
1 |
2 |
5 |
1 |
|
|
5 |
Оформление дипломной записки, включая консультации по метрологии, экономики, безопасности жизнедеятельности и нормоконтролю |
3,4 |
1 |
3 |
1 |
Оценка продолжительности выполнения работы вычисляется по формуле:
где a и b - минимальная и максимальная продолжительности работы.
Наиболее ранний срок начала работ определяется по формуле:
где - сроки раннего начала предшествующей работы.
Если к раннему сроку начала каждой работы прибавить их продолжительность, то будет получен наиболее ранний срок их окончания. Максимальная величина определить продолжительность всей разработки, то есть критическое время
Если работа лежит на критическом пути, то наиболее ранний и наиболее поздний сроки ее окончания совпадают.
Наиболее поздний срок окончания работы можно определить как разность между критическим временем и продолжительностью максимального пути от конца разработки до работы . Если просмотреть сеть справа налево, то есть так, что при вычислении наиболее позднего срока окончания работы поздние сроки окончании всех последующих работ уже вычислены, то
Резерв времени для каждой работы вычисляется по формуле
Если … и работы … связаны между собой, то они составляют критический путь разработки.
Полный резерв времени недостаточно отражает меру критических работ. Работы могут обладать одинаковым резервом, но если при этом распространены на участках различной длины, то напряженность выполнения работ будет неодинакова. Для характеристики напряженности выполнения каждой работы вводится коэффициент K, для вычисления которого нужно найти путь максимальной длины, проходящий через данную работу (), и критический путь. Работы, общие для этих двух путей исключается, и отношения оставшихся несовпадающих участков путей принимается за коэффициент напряженности
(11)
Продолжительность выполнения каждой работы - величина случайная, распределенная в интервале (a, b), то реальные работы будут выполняться не точно за время, равное среднему значению, а быстрее или дольше.
биметалл слой сварка давление
Степень рассеяния продолжительности работ около их средних значений учитывается с помощью подсчета этих величин:
где - дисперсия продолжительности данной работы;
a и b - минимальная и максимальная продолжительности работы.
Ранние сроки начала работ также являются случайными величинами, дисперсия которых зависит от рассеивания продолжительности предшествующих работ. Для начальных работ сети . Если принять продолжительность различных путей сетевого графика, предшествующих данной работе, за независимые величины, то определяется по правилу сложения дисперсии:
где и - значения дисперсий работы , предшествующей данной работе и принадлежащей пути максимальной длины, проходящему через работу .
Дисперсия срока окончания выполнения работ критического пути равна:
, (12)
где … - последовательность работ одного критического пути. Длительность критического пути, являющаяся случайной величиной, распределенной, по нормальному закону, полностью характеризуется математическим ожиданием и дисперсией.
(13)
( … - последовательность работ критического пути).
Вероятность окончания работы в срок определяется по формуле:
(14)
гдеT - директивный срок выполнения работы;
Ф - нормальная функция распределения вероятностей.
При разработке сетевых графиком выполнения НИР принято считать удовлетворительным план, при котором вероятность завершения темы в запланированный срок P?0,4 [ссылка на литературу].
Расчет параметров сетевого графика по формулам, указанным выше, приведен в таблице 11.
Таблица 11 - Исходные данные и результаты расчетов сетевого графика
|
Код работы |
Шифр работы |
a |
b |
t |
||||||
|
1 |
1-2 |
3 |
5 |
4 |
0 |
4 |
0 |
0,16 |
0 |
|
|
2 |
2-3 |
2 |
3 |
2 |
4 |
6 |
0 |
0,04 |
0,16 |
|
|
3 |
3-4 |
2 |
3 |
2 |
6 |
8 |
0 |
0,04 |
0,2 |
|
|
4 |
2-4 |
2 |
5 |
3 |
4 |
8 |
1 |
0,36 |
0,16 |
|
|
5 |
4-5 |
1 |
3 |
2 |
8 |
10 |
0 |
0,16 |
0.52 |
Рисунок 10 - Сетевой график
Все величины выражены в неделях, сетевой график планирования проведения дипломной НИР представлен на рисунке 10.
Критический путь: 1-2-3-5.
Допустим, что работы некритических последовательностей могут приблизиться к работа критического пути не более, чем на 1 неделю, т.е. д=1. Тогда подкритическими будут работы, резерв которых R? д=1, т.е. работа 4.
Путь максимальной продолжительности, проходящей через эту работу, состоит из работ 1-4-5. Согласно определению этот путь - подкритический.
Напряженность работы определяется как отношение продолжительности из путей, на которых лежит данная работа, к отношению продолжительности критического пути всего исследования. При этом работы, общие для этих путей исключаются из расчета. Тогда напряженность работ, лежащих на критическом пути равна единице.
Коэффициент напряженности работы 4 вычисляется по формуле (11):
Дисперсия продолжительности критического пути (12):
Допустим, что срок выполнения дипломной НИР составляет 13 недель. Вероятность того, что вся разработка окончится в запланированный срок, вычисляется по формуле (14) Нижняя граница интервала, на котором определено критическое время разработки, равна сумме минимальных оценок критической последовательности (13):
Вероятность окончания работы в срок равна:
Таким образом, вычисленная вероятность выполнения работы в срок больше приемлемого значения 0,4.
Заключение
В данной дипломной работе разработана методика проектирования режимов деформации для прокатки биметалла. Данная модель позволяет рассчитать кинематические и силовые параметры процесса, а также геометрические параметры готового изделия и положение точки сцепления слоев. В работе предложена феноменологическая теория сварки при прокатке. С использованием этой теории математическая модель позволяет прогнозировать свариваемость слоев при деформации. Работоспособность модели подтверждена экспериментально на паре сплавов АД0 и АД31. Правильность расчета кинематических параметров проверена методом муар.
Список использованных источников
1. Каракозов Э.С. Сварка металлов давлением. М.: Машиностроение. 1986.
2. Красулин Ю.Л. Взаимодействие металла с полупроводником в твердой фазе. М.: Наука, 1971.119с.
3. К вопросу расчетной оценки режимов сварки давлением. М.Х. Шорошов, Ю.Л. Красулин, А.М. Дубасов и др. - Сварочное производство, 1967, № 7, с.14-17.
4. Красулин Ю.Л. Дислокация как активные центры в топохимических реакциях. - Теоретическая и экспериментальная химия, 1967, т III, вып.1, с 58-65.
5. П.Ф. Засуха, В.Д. Корщиков, О.Б. Бухвалов и др. Биметаллический прокат. - М.: Металлургия, 1971. - 264с.
6. Малышев В.М., Румянцев Д.В. Серебро. - М.: Металлургия, 1976. - 311с.
7. Аркулис Г.Э., Дорогобид В.Г. Об искривлении межслойных поверхностей при прокатке биметаллических полос. Научн. тр. Челябинский политехнический институт, 1968, № 5, с.91-94.
8. Аркулис Г.Э., Дорогобид В.Г. Об изменении шероховатости межслойных поверхностей при прокатке слоистых материалов. Известия АН СССР, 1967, № 3, с.91-94.
9. Гугузин Я.Б., Нгуен Чонг Бао, Парицкая Л.Н. О рельефе поверхности в области диффузионной зоны в связи с влиянием малых давлений на взаимную диффузию. Физика металлов и металловедения, 1970, т.30, № 4, с 790-795.
10. Мастеров В.А., Саксонов Ю.В. Серебро, сплавы и биметаллы на его основе. - М.: Металлургия, 1979. - с.296.
11. Бухвалов О.Б., Засухин П.Ф., Ляшков В.Б. Уменьшение разнотолщинности стального слоя при прокатке подшипникова биметалла. Сталь, 1969, № 6, с.535-537.
12. Лапис А.В., Ляшков В.Б. Определение разнотолщинности компонентов биметалла. Извстия ВУЗ-ов. Черная металлургия, 1970, №1, с.25-31.
13. А.В. Архангельский, П.И. Полухин, Ю.В. Кнышев и др. Расчет деформаций биметаллического пакета при прокатке. В сб. МИСиС: Пластическая деформация металлов и сплавов. - М.: Металлургия, 1968, № 47, с.141-146.
14. О.Б. Бухвалов, А.Н. Леванов, И.Я. Тарновскй и др. Тр. /Уральский научн. Иссл. Институт черных металлов, т.6. - М.: Металлургия, 1968, с.168-175.
15. В.Д. Корщинов, П.Ф. Засуха, В.Ф. Ещенко и др. Получение плакированной алюминием тонколистовой стали для глубокой вытяжки. - Сталь, 1968, № 5, с.441-444.
16. Мастеров В.А., Барыкин Н.П., Архангельский А.В. Расчет обжатий при двустороннем плакировании. - В сб. МИСиС.: Пластическая деформация металлов и сплавов. - М.: Металлургия, 1968, № 47, с.152-158.
17. Тарновский И.Я. Расчет и конструирование заводского оборудования. - М.: Свердловск. Машиностроение. Тр. УПИ, вып.48, 1953, с.64.
18. Король В.К., Козлов К.Е., Белякова Н.А. Исследование неравномерности послойной деформации в начальной стадии прокатки слоистых плит. Технология легких сплавов, 1980, № 5, с.29-33.
19. Л.В. Меандров, А.А. Бычков, В.В. Зайцев и др. - В сб. Листопрокатное производство. - М.: Металлургия, 1973, 137 с.
20. Л.В. Меандров, А.А. Бычков, В.В. Зайцев и др. Теоретическое определение послойной деформации при обработке давлением биметалла с прочным сцеплением слоев. Технология легких сплавов, 1973, № 5, с.74-78.
21. Меандров Л.В., Устиненко В.А. Исследование деформации слоев биметалла при обработке металлов давлением. Известия ВУЗ-ов. Черная металлургия, 1963, № 11, с.109-112.
22. Аркулис Г.Э. Совместная пластическая деформация разных металлов. - М.: Металлургия, 1964. - 272 с.
23. Астров Е.М. Плакированные многослойные металлы. - М.: Металлургия, 1965. - 240 с.
24. Голованенко С.А., Меандров Л.В. Производство биметаллов. - М.: Металлургия, 1966 - 168 с.
25. Налимов В.В., Чернова Н.Н. Статистические методы планирования экспериментов. - М.: Наука 1965. - 340 с.
26. Зибель Э. Обработки металлов в пластическом состоянии. - М.: Металлургия. 1934.198 с.
27. Кучеряев Б.В., Кузнецов Е.В. Математическая модель прокатки трехслойной биметаллической полосы. Производство проката № 10, 2004, с.10-14.
28. Третьяков А.А., Зюзин В.И. Механические свойства металлов при обработке давлением. - М.: Металлургия. 1973.224 с.
29. Кучеряев Б.В., Крахт В.Б., Манухин О.Г. Моделирование процессов и объектов в металлургии. Ч.1. Моделирование и оптимизация технологических систем: Учеб. пособие. - М.: МИСиС, 2004. - 62 с.
30. ГОСТ 12.1.010-76. ССБТ. Взрывобезопасность. Общие требования. - М.: Издательство стандартов, 1976.
Приложения
Приложение А - Программа построения поля скоростей
CLS
Прокатка биметалла. Вариационная задача.
Построение изолиний на основном решении.
Программа составлена студентом гр. МОЦ-02-1 Кучеряевым Вик. В.12.04.2007 г.
PI = 3.14159265#: S3 = SQR (3): UM = 1000000
PRINT "Ввести: "
OPEN "SUPER3. DAT" FOR OUTPUT AS #1
PRINT "радиус валка, мм R = ";: INPUT R
PRINT #1, "Исходные данные: "
PRINT "количество варьируемых параметров - N= ";: INPUT N
PRINT #1, "количество варьируемых параметров - N= "; N
DIM S (N), A1 (N), A2 (N), Z (N), LT (P2), P (P2, P1)
DIM W1 (P2, P1), W2 (P2, P1), W3 (P2, P1), K1 (P2, P1), K2 (P2, P1), K3 (P2, P1)
DIM H (P2, P1), GAM (P2, P1), T (P2, P1), LAMB (P2, P1)
PRINT #1, "радиус валка, мм R = "; R
PRINT "коэффициент трения по напряжению пластического сдвига, если неизвестен, то MU=0, б\р MUT= ";: INPUT MUT
PRINT "высоту заготовки, мм H0 = ";: INPUT H0
PRINT #1, "высота заготовки, мм H0 = "; H0
PRINT "высоту изделия, мм H1 = ";: INPUT H1
PRINT #1, "высота изделия, мм H1 = "; H1
PRINT "высоту плакировки, мм H01 = ";: INPUT H01
PRINT #1, "высоту плакировки, мм H01 = "; H01
PRINT "напряжение пластического сдвига плакировки, MПа TT1= ";: INPUT TT1
PRINT #1, "напряжение пластического сдвига плакировки, MПа TT1= "; TT1
PRINT "напряжение пластического сдвига основного слоя, MПа TT2= ";: INPUT TT2
PRINT #1, "напряжение пластического сдвига основного слоя, MПа TT2= "; TT2
PRINT "осесимметричный пакет: PP=0, асимметричный пакет: PP=2";: INPUT PP
PRINT #1, "осесимметричный пакет: PP=0, асимметричный пакет: PP=2"; PP
N = 5: P1 = 17: P2 = 55
DIM S (N), A1 (N), A2 (N), Z (N), LT (P2), P (P2, P1)
DIM W1 (P2, P1), W2 (P2, P1), W3 (P2, P1), K1 (P2, P1), K2 (P2, P1), K3 (P2, P1)
DIM H (P2, P1), GAM (P2, P1), T (P2, P1), LAMB (P2, P1)
OPEN "SUPER2. DAT" FOR OUTPUT AS #1
TTM = TT1
IF TT2 <= TT1 THEN TTM = TT2
DT = 1
DH = H0 - H1: EPS = DH / H0
LD = SQR (R * DH - .25 * DH * DH): EM = - 1.5 * LD: EP =.5 * LD
H02 = H0 - H01: DELTA1 =.1 * LD: DELTA2 =.1 * LD
EH = - LD - DELTA1: EH1 = - LD + DELTA1: EF1 = - DELTA2
EF = DELTA2: MP = 2 * LD / (H0 + H1): DET = H0 / 20
TG = (H0 - H1) / 2/LD:
PSIS = V0 * (H0 / 2 - H01)
PSIP =.5 * V0 * H0
PSIM = 0
IF MUT = 0 GOTO 2
MU = MUT
GOTO 3
2 MU = 2 * EPS / (2 - EPS) / MP
3 IF MP > 1 THEN KF =.4
IF MU >.5 THEN MU =.5
MUP = MU * MP ^ KF / (1 + MU * MP)
PRINT "TG="; TG; "MUP="; MUP
HH = H1 + DH * ABS (1 - TG / MUP)
LH = (HH - H1) / 2/TG
LH =.5 * DH * ABS (1/TG - 1/MUP)
PRINT #1, " Кoэффициенты трения: MUT= ";
PRINT #1, USING "#. ###"; MU;
PRINT #1, "; MUP=";
PRINT #1, USING "#. ###"; MUP
PRINT #1, " "
PRINT " Кoэффициенты трения: MUT= ";
PRINT USING "#. ###"; MU;
PRINT "; MUP=";
PRINT USING "#. ###"; MUP
PRINT " "
' Минимизация функционала
A1 (N) =.1: A2 (N) =.9: A1 (N - 1) = 0: A2 (N - 1) = 1: UM = 10000000
FOR I = 1 TO N - 2
A1 (I) = - 1: A2 (I) = 1
NEXT I
PRINT TIME$; (W)
PRINT #1, TIME$; (W)
FOR I = 1 TO N
Z (I) = A1 (I): S (I) =.5 * (A2 (I) - A1 (I)): LT (I) = Z (I)
NEXT I
KL = 1
4 M = 0: G = 0
FOR I = 1 TO N
S (I) =.5 * S (I): G = G + ABS (S (I))
NEXT I
G = G / N:
PRINT "KL= "; KL, "G= "; G
FOR K8 = 1 TO N
5 Z (K8) = Z (K8) + S (K8)
IF Z (K8) < A1 (K8) OR Z (K8) > A2 (K8) GOTO 6
GOSUB 9
IF U >= UM GOTO 6
PRINT USING "#######. ## ########. ## "; UM; U;
UM = U: M = 0
FOR L8 = 1 TO N
PRINT USING " ###. #### "; Z (L8);
NEXT L8
PRINT " "
GOTO 5
6 S (K8) = - S (K8): Z (K8) = Z (K8) + S (K8): M = M + 1
IF M < 2 GOTO 5
7 NEXT K8
KL = KL + 1
IF G >= E GOTO 4
PRINT USING "#######. ## "; UM;
PRINT #1, USING "#######. ## "; UM;
FOR I = 1 TO N
PRINT USING "###. ###### "; Z (I);
PRINT #1, USING "#####. ###### "; Z (I)
NEXT I
H11 = Z (1) * H1: EC = Z (2) * LD
PRINT "H11 = ";
PRINT USING "###. ###### "; H11;
PRINT #1, USING "#####. ###### "; H11;
PRINT "EC = ";
PRINT USING "###. ###### "; EC
PRINT #1, USING "#####. ###### "; EC
GOTO 100
200 CLOSE #1
END
9 ' Функционал Ж. Лагранжа
PRINT "______________________________________________________"
PRINT " SS E1 TT E2 V1 V2 V11 V21 V12 V22"
PRINT "______________________________________________________"
'Основное поле
JEXT = 0: JINT = 0: JMC = 0: ET1 = - .5 * H0
10 E2 = EM: E1 = ET1
TT = TT + 1
PRINT "E1="; E1
11 IF E2 >= EM AND E2 <= EH THEN
PSI = - V0 * ET1: V1 = 0: V2 = V0: H = H0
KSI11 = 0: KSI12 = 0
END IF
IF E2 > EH AND E2 <= EH1 THEN
A = EH1
B =.0625
G1 = 2 * (EH1 - EH) / PI
ESTR = (2 * E2 - EH - EH1) / G1
X2 =.5 * (E2 + A) - B * G1 * (9 * COS (ESTR) + (1/3) * COS (3 * ESTR))
F =.5 + B * (9 * SIN (ESTR) + SIN (3 * ESTR))
FS = B * (9 * COS (ESTR) + 3 * SIN (3 * ESTR)) / G1
H = H1 + 2 * R - 2 * SQR (R ^ 2 - X2 ^ 2)
PSI = - V0 * H0 * E1/H
HS = 2 * X2/ (SQR (R ^ 2 - X2 ^ 2))
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - X2 ^ 2) ^ 3)
V1 = V0 * H0 * E1 * HS * F / H ^ 2
V2 = V0 * H0 / H
KSI11 = V0 * H0 * HS * F / H ^ 2
KSI12 = V0 * H0 * E1 * (HSS * F + HS * FS - 2 * HS ^ 2 * FS ^ 2/H) / H ^ 2
END IF
IF E2 > EH1 AND E2 <= EF1 THEN
F = 1
FS = 0
H = H1 + 2 * R - 2 * SQR (R ^ 2 - E2 ^ 2)
PSI = - V0 * H0 * E1/H
HS = 2 * E2/SQR (R ^ 2 - E2 ^ 2)
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - E2 ^ 2) ^ 3)
H = H1 + 2 * R - 2 * SQR (R ^ 2 - E2 ^ 2)
V1 = V0 * H0 * E1 * 2 * E2/ (H ^ 2 * SQR (R ^ 2 - E2 ^ 2))
V2 = V0 * H0 / H
KSI11 = V0 * H0 * HS * F / H ^ 2
KSI12 = V0 * H0 * E1 * (HSS * F + HS * FS - 2 * HS ^ 2 * FS ^ 2/H) / H ^ 2
END IF
IF E2 > EF1 AND E2 <= EF THEN
A = EF1
B = - .0625
G1 = 2 * (EF1 - EF) / PI
ESTR = (2 * E2 - EF - EF1) / G1
X2 =.5 * (E2 + A) - B * G1 * (9 * COS (ESTR) + (1/3) * COS (3 * ESTR))
F =.5 + B * (9 * SIN (ESTR) + SIN (3 * ESTR))
FS = B * (9 * COS (ESTR) + 3 * SIN (3 * ESTR)) / G1
H = H1 + 2 * R - 2 * SQR (R ^ 2 - X2 ^ 2)
PSI = - V0 * H0 * E1/H
HS = 2 * X2/ (SQR (R ^ 2 - X2))
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - E2 ^ 2) ^ 3)
V1 = V0 * H0 * E1 * F * HS / H ^ 2
V2 = V0 * H0 / H
KSI11 = V0 * H0 * HS * F / H ^ 2
KSI12 = V0 * H0 * E1 * (HSS * F + HS * FS - 2 * HS ^ 2 * FS ^ 2/H) / H ^ 2
END IF
IF E2 > EF AND E2 <= EP THEN
PSI = - V0 * H0 * E1/H1: V1 = 0: V2 = V0 * H0 / H1: H = H1
KSI11 = 0: KSI12 = 0
H = H1
END IF
GOTO 70
'Скорректированное поле
FI = 0: DFIDE2 = 0: DFIDP = 0: DFIDP2 = 0: D2FIDE22 = 0: D2FIDPDE2 = 0
FIE = (1 - E2/EP) * (E2/EP - EM / EP)
FIP = (1 - PSI / PSIP) * (PSI - PSIM)
DFIEDE = (1/EP) * (EM / EP + 1 - 2 * E2/EP)
DFIPDP = PSIM / PSIP + 1 - 2 * PSI / PSIP
D2FIEDE2 = - 2/EP
D2FIPDP2 = - 2/PSIP
FOR I = 3 TO N - 2
FOR K = 3 TO N - 2
FI = FI + Z (I) * FIP ^ I * FIE ^ K
DFIDE2 = DFIDE2 + K * Z (I) * FIP ^ I * DFIEDE * FIE ^ (K - 1)
DFIDP = DFIDP + I * Z (I) * DFIPDP * FIP ^ (I - 1) * FIE ^ K
DFIDP2 = DFIDP2 + I * Z (I) * (D2FIPDP2 * FIP ^ (I - 1) + (I - 1) * DFIPDP ^ 2 * FIP ^ (I - 2)) * FIE ^ K
D2FIDE22 = D2FIDE22 + K * Z (I) * (D2FIEDE2 * FIE ^ (K - 1) + (K - 1) * DFIEDE ^ 2 * FIE ^ (K - 2)) * FIP ^ I
D2FIDPSIDE2 = D2FIDPSIDE2 + I * K * Z (I) * FIP ^ (I - 1) * DFIPDP * FIE ^ (K - 1) * DFIEDE
NEXT K
NEXT I
PSIB = PSI + FI
VB1 = V1 * (1 + DFIDP) + DFIDE2: VB2 = V2 * (1 + DFIDP)
KSIB11 = KSI11 * (1 + DFIDP) - V1 * V2 * DFIDP2 - V2 * D2FIDPSIDE2
KSIB12 = KSI12 * (1 + DFIDP) +.5 * ( (V1 ^ 2 + V2 ^ 2) * DFIDP2 + V1 * D2FIDPSIDE2 + D2FIDE2)
70 'Поле биметалла
H11 = Z (N) * H1: M2 = 2 * LD / (H0 - H01 + H1 - H11)
EPS2 = (H0 - H01 - H1 + H11) / (H0 - H01)
MUMC = 2 * EPS2/ (2 - EPS2) / M2
EC = - Z (N - 1) * LD
PSIF = V0 * H0 * (H1/2 - H11) / H1
ET = PI * (2 * E2 - EM - EC) / (2 * (EM - EC))
B1 = (PSIF - PSIS) / (PSIS - PSIP)
BC =.5 +.0625 * (9 * SIN (ET) + SIN (3 * ET))
PSICT = (PSIF + PSIP * B1 * BC) / (1 + B1 * BC)
B2 = (PSIF - PSIP) * B1/ (PSIF - PSIM + (PSIP - PSIM) * B1 * BC)
DBCDE =.0625 * (9 * COS (ET) + 3 * COS (3 * ET)) * PI / (EH - EC)
D2BCDE2 = - .5625 * (SIN (ET) + SIN (3 * ET)) * (PI / (EH - EC)) ^ 2
DB2DBC = - B2/BC
DB2dE = - DBCDE * B2/BC
D2B2DBCDE = - (DB2dE * BC - B2 * DBCDE) / BC ^ 2
D2B2DE2 = D2BCDE2 * DB2DBC + DBCDE2 * D2B2DBCDE
PSI1 = PSI + B1 * (PSIP - PSI) * BC
PSI2 = PSI + B2 * (PSI - PSIM) * BC
IF E2 >= EC THEN
GOTO 12
END IF
IF ET1 <= - .5 * H0 + H01 THEN
V11 = V1 * (1 + B1 * BC) + B1 * (PSI - PSIP) * DBCDE
V21 = V2 * (1 + B1 * BC)
KSI111 = KSI11 * (1 + B1 * BC) - V2 * B1 * DBCDE
KSI121 = KSI12 * (1 + B1 * BC) + B1 * (V1 * DBCDE +.5 * (PSI - PSIP) * D2BCDE2)
VT1 = V11: VT2 = V21
ELSE
V12 = V1 * (1 + B2 * BC) + (PSI - PSIM) * (BC * DB2dE + DBCDE * B2)
V22 = V2 * (1 + B2 * BC)
KSI112 = KSI11 * (1 + B2 * BC) - V2 * (BC * DB2dE + DBCDE * B2)
KSI122 = KSI12 * (1 + B2 * BC) + V1 * (BC * DB2dE + DBCDE * B2) +.5 * (PSBI - PSIP) * (D2B2DE2 * BC + 2 * DB2dE * DBCDE + B2 * D2BCDE2)
VT1 = V12: VT2 = V22
END IF
GOTO 13
V11 = VB1 * (1 + B1 * BC) + B1 * (PSBI - PSIP) * DBCDE
V21 = VB2 * (1 + B1 * BC)
V12 = VB1 * (1 + B2 * BC) + (PSBI - PSIM) * (BC * DB2dE + DBCDE * B2)
V22 = VB2 * (1 + B2 * BC)
KSI111 = KSIB11 * (1 + B1 * BC) - VB2 * B1 * DBCDE
KSI121 = KSIB12 * (1 + B1 * BC) + B1 * (VB1 * DBCDE +.5 * (PSBI - PSIP) * D2BCDE2)
KSI112 = KSIB11 * (1 + B2 * BC) - VB2 * (BC * DB2dE + DBCDE * B2)
KSI122 = KSIB12 * (1 + B2 * BC) + VB1 * (BC * DB2dE + DBCDE * B2) +.5 * (PSBI - PSIP) * (D2B2DE2 * BC + 2 * DB2dE * DBCDE + B2 * D2BCDE2)
GOTO 13
12 VT1 = V1: VT2 = V2
13 DE2 = DT * VT2
DE1 = DT * VT1
VT2
E2 = E2 + DE2
E1 = E1 + DE1: KT = - 1: TTT = TT1
ETA = 2 * SQR (KSI111 ^ 2 + KSI121 ^ 2)
IF ET1 > - .5 * H0 + H01 THEN
TTT = TT2: ETA = 2 * SQR (KSI112 ^ 2 + KSI122 ^ 2)
END IF
JINT = JINT + TTT * ETA * DE1 * DE2
IF ET1 > - .5 * H0 +.0001 GOTO 14
IF E2 >= - LH THEN KT = 1
VT = SQR (V11 ^ 2 + V21 ^ 2): DL = SQR (DE1 ^ 2 + DE2 ^ 2)
JEXT = JEXT + 2 * KT * MU * TT1 * VT * DL
14 IF E2 <= EP GOTO 11
ET1 = ET1 + DET
SS = 0
'INPUT FF
IF ET1 <= 0 GOTO 10
' Мощность межслойных сил
E1 = - .5 * H0 + H01: E2 = EM
21 IF E2 >= EM AND E2 <= EH THEN
PRINT "ਠI"
PSI = - V0 * ET1: V1 = 0: V2 = V0: H = H1
END IF
IF E2 > EH AND E2 <= EH1 THEN
PRINT "E1="; E1
PRINT "ਠII"
A = EH1
B =.0625
G1 = 2 * (EH1 - EH) / PI
ESTR = (2 * E2 - EH - EH1) / G1
X2 =.5 * (E2 + A) - B * G1 * (9 * COS (ESTR) + (1/3) * COS (3 * ESTR))
F =.5 + B * (9 * SIN (ESTR) + SIN (3 * ESTR))
FS = B * (9 * COS (ESTR) + 3 * SIN (3 * ESTR)) / G1
H = H1 + 2 * R - 2 * SQR (R ^ 2 - X2 ^ 2)
HS = 2 * X2/ (SQR (R ^ 2 - X2 ^ 2))
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - X2 ^ 2) ^ 3)
V1 = V0 * H0 * E1 * HS * F / H ^ 2
V2 = V0 * H0 / H
END IF
IF E2 > EH1 AND E2 <= EF1 THEN
PRINT "ਠIII"
F = 1
FS = 0
H = H1 + 2 * R - 2 * SQR (R ^ 2 - E2 ^ 2)
HS = 2 * E2/SQR (R ^ 2 - E2 ^ 2)
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - E2 ^ 2) ^ 3)
H = H1 + 2 * R - 2 * SQR (R ^ 2 - E2 ^ 2)
V1 = V0 * H0 * E1 * 2 * E2/ (H ^ 2 * SQR (R ^ 2 - E2 ^ 2))
V2 = V0 * H0 / H
END IF
IF E2 > EF1 AND E2 < EF THEN
PRINT "ਠIV"
A = EF1
B = - .0625
G1 = 2 * (EF1 - EF) / PI
ESTR = (2 * E2 - EF - EF1) / G1
X2 =.5 * (E2 + A) - B * G1 * (9 * COS (ESTR) + (1/3) * COS (3 * ESTR))
F =.5 + B * (9 * SIN (ESTR) + SIN (3 * ESTR))
FS = B * (9 * COS (ESTR) + 3 * SIN (3 * ESTR)) / G1
H = H1 + 2 * R - 2 * SQR (R ^ 2 - X2 ^ 2)
HS = 2 * X2/ (SQR (R ^ 2 - X2))
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - E2 ^ 2) ^ 3)
V1 = V0 * H0 * E1 * F * HS / H ^ 2
V2 = V0 * H0 / H
END IF
IF E2 >= EF AND E2 <= EP THEN
PRINT "ਠV"
PSI = - V0 * H0 * ET1/H1: V1 = 0: V2 = V0 * H0 / H1
H = H1
END IF
PRINT "V1="; V1; "V2="; V2
PSI = - V0 * H0 * E1/H
KSI11 = V0 * H0 * HS * F / H ^ 2
KSI22 = - KSI11
KSI12 = V0 * H0 * E1 * (HSS * F + HS * FS - 2 * HS ^ 2 * FS ^ 2/H) / H ^ 2
KSI21 = KSI12
'Скорректированное поле
FI = 0: DFIDE2 = 0: DFIDP = 0: DFIDP2 = 0: D2FIDE22 = 0: D2FIDPDE2 = 0
FOR I = 3 TO N
FOR K = 1 TO N - 2
FIE = (1 - E2/EP) * (E2/EP - EM / EP)
FIP = (1 - PSI / PSIP) * (PSI - PSIM)
DFIEDE = (1/EP) * (EM / EP + 1 - 2 * E2/EP)
DFIPDP = PSIM / PSIP + 1 - 2 * PSI / PSIP
D2FIEDE2 = - 2/EP
D2FIPDP2 = - 2/PSIP
FI = FI + Z (I) * FIP ^ (I - 2) * FIE ^ K
DFIDE2 = DFIDE2 + K * Z (I) * FIP ^ (I - 2) * DFIEDE * FIE ^ (K - 1)
DFIDP = DFIDP + (I - 2) * Z (I) * DFIPDP * FIP ^ (I - 3) * FIE ^ K
DFIDP2 = DFIDP2 + (I - 2) * Z (I) * (D2FIPDP2 * FIP ^ (I - 3) + (I - 3) * DFIPDP ^ 2 * FIP ^ (I - 4)) * FIE ^ K
D2FIDE2 = D2FIDE2 + K * Z (I) * (D2FIEDE2 * FIE ^ (K - 1) + (K - 1) * DFIEDE ^ 2 * FIE ^ (K - 2)) * FIP ^ (I - 2)
D2FIDPSIDE2 = D2FIDPSIDE2 + (I - 2) * K * Z (I) * FIP ^ (I - 3) * DFIPDP * FIE ^ (K - 1) * DFIEDE
NEXT K
NEXT I
PSIB = PSI + FI
VB1 = V1 * (1 + DFIDP) + DFIDE2: VB2 = V2 * (1 + DFIDP)
KSIB11 = KSI11 * (1 + DFIDP) - V1 * V2 * DFIDP2 - V2 * D2FIDPSIDE2
KSIB12 = KSI12 * (1 + DFIDP) +.5 * ( (V1 ^ 2 + V2 ^ 2) * DFIDP2 + V1 * D2FIDPSIDE2 + D2FIDE2)
'Поле биметалла
H11 = Z (1) * H1: M2 = 2 * LD / (H0 - H01 + H1 - H11)
EPS2 = (H0 - H01 - H1 + H11) / (H0 - H01)
MUMC = 2 * EPS2/ (2 - EPS2) / M2
EC = - Z (2) * LD
PSIF = V0 * H0 * (H1/2 - H11) / H1
ET = PI * (E2 - EM - EC) / (2 * (EM - EC))
B1 = (PSIF - PSIS) / (PSIS - PSIP)
BC =.5 +.0625 * (9 * SIN (ET) + SIN (3 * ET))
PSICT = (PSIF + PSIP * B1 * BC) / (1 + B1 * BC)
B2 = (PSIF - PSIP) * B1/ (PSIF - PSIM + (PSIP - PSIM) * B1 * BC)
DBCDE =.0625 * (9 * COS (ET) + 3 * COS (3 * ET)) * PI / (EH - EC)
D2BCDE2 = - .5625 * (SIN (ET) + SIN (3 * ET)) * (PI / (EH - EC)) ^ 2
DB2DBC = - B2/BC
DB2dE = - DBCDE * B2/BC
D2B2DBCDE = - (DB2dE * BC - B2 * DBCDE) / BC ^ 2
D2B2DE2 = D2BCDE2 * DB2DBC + DBCDE2 * D2B2DBCDE
PSI1 = PSI + B1 * (PSIP - PSI) * BC
PSI2 = PSI + B2 * (PSI - PSIM) * BC
IF TT2 > TT1 THEN
V1 = VB1 * (1 + B1 * BC) + B1 * (PSIP - PSIB) * DBCDE
V2 = VB2 * (1 + B1 * BC)
ELSE
V1 = V1 * (1 + B2 * BC) + (PSI - PSIM) * (BC * DB2dE + DBCDE * B2)
V2 = V2 * (1 + B2 * BC)
'V1 = VB1 * (1 + B2 * BC) + (PSIB - PSIM) * (BC * DB2dE + DBCDE * B2)
'V2 = VB2 * (1 + B2 * BC)
END IF
DE2 = DT * V2: VT = SQR (V1 ^ 2 + V2 ^ 2)
DE1 = DT * V1: DL = SQR (DE1 ^ 2 + DE2 ^ 2)
JMC = JMC + 2 * MUMC * TTM * VT * DL
E2 = E2 + DE2
E1 = E1 + DE1
IF E2 <= EP GOTO 21
U = JEXT + JINT + JMC
PRINT "U="; U; "UM="; UM
INPUT FF
RETURN
100 PRINT #1, " Картины кинематических параметров"
PRINT TIME$; (W)
PRINT #1, TIME$; (W)
GOSUB 49
PRINT TIME$; (W)
PRINT #1, TIME$; (W)
PRINT USING "### ### "; M1; M2
PRINT #1, USING "### ### "; M1; M2
PRINT " Будете строить изолинии PSI=const? Нет-N1=0, Да-N1>0) N1= ";: INPUT N1
IF N1 < 1 GOTO 20
PRINT "PMAX="; PMAX; "PMIN="; PMIN;
PRINT #1, "PMAX="; PMAX; "PMIN="; PMIN;
PRINT "X1PMAX="; X1PMAX; "X1PMIN="; X1PMIN; "X2PMAX="; X2PMAX; "X2PMIN="; X2PMIN;
PRINT #1, "X1PMAX="; X1PMAX; "X1PMIN="; X1PMIN; "X2PMAX="; X2PMAX; "X2PMIN="; X2PMIN;
CI = 11: DV = (PMAX - PMIN) / CI: LMIN = PMIN: LN = 8999
PRINT "DV="; DV: PRINT #1, "DV="; DV: PRINT #1, " "
FOR M = 1 TO M2
FOR L = 1 TO M1
LAMB (L, M) = P (L, M)
NEXT L
NEXT M
GOSUB 164
FOR M = 1 TO M2
FOR L = 1 TO M1
LAMB (L, M) = P (L, M2 + 1 - M)
NEXT L
NEXT M
GOSUB 164
20 PRINT " Будете строить изотахи V1,V2=const? Нет-N1=0, Да-N1>0) N1= ";: INPUT N1
IF N1 < 1 GOTO 11
PRINT "V1MAX="; V1MAX; "V1MIN="; V1MIN;
PRINT #1, "V1MAX="; V1MAX; "V1MIN="; V1MIN;
PRINT "X1V1MAX="; X1V1MAX; "X1V1MIN="; X1V1MIN; "X2V1MAX="; X2V1MAX; "X2V1MIN="; X2V1MIN;
PRINT #1, "X1V1MAX="; X1V1MAX; "X1V1MIN="; X1V1MIN; "X2V1MAX="; X2V1MAX; "X2V1MIN="; X2V1MIN;
CI = 15: DV = ABS (V1MAX - V1MIN) / CI: LMIN = V1MIN: LN = 8999
PRINT "DV1="; DV: PRINT #1, "DV1="; DV: PRINT #1, " "
PRINT "V2MAX="; V2MAX; "V2MIN="; V2MIN;
PRINT #1, "V2MAX="; V2MAX; "V2MIN="; V2MIN;
PRINT "X1V2MAX="; X1V2MAX; "X1V2MIN="; X1V2MIN; "X2V2MAX="; X2V2MAX; "X2V2MIN="; X2V2MIN
PRINT #1, "X1V2MAX="; X1V2MAX; "X1V2MIN="; X1V2MIN; "X2V2MAX="; X2V2MAX; "X2V2MIN="; X2V2MIN
FOR M = 1 TO M2
FOR L = 1 TO M1
LAMB (L, M) = W1 (L, M)
NEXT L
NEXT M
GOSUB 164
CI = 15: DV = ABS (V2MAX - V2MIN) / CI: LMIN = V2MIN: LN = 8999
FOR M = 1 TO M2
FOR L = 1 TO M1
LAMB (L, M) = W2 (L, M2 + 1 - M)
NEXT L
NEXT M
GOSUB 164
PRINT "DV2="; DV: PRINT #1, "DV2="; DV: PRINT #1, " "
GOTO 200
49 '" Подпрограмма построения картин в плоскости Е1, Е2"
DE2 = (EP - EM) / P1: DE1 = (.5 * H0) / P2
PMAX = - 10: PMIN = 1000000: V1MAX = - 10: V1MIN = 1000000: V2MAX = 0
V2MIN = 1000000
E1 = - .5 * H0
30 E2 = EH
PRINT "E1="; E1
31 IF E2 >= EM AND E2 <= EH THEN
PSI = - V0 * ET1: V1 = 0: V2 = V0: H = H0
KSI11 = 0: KSI12 = 0
END IF
IF E2 > EH AND E2 <= EH1 THEN
A = EH1
B =.0625
G1 = 2 * (EH1 - EH) / PI
ESTR = (2 * E2 - EH - EH1) / G1
X2 =.5 * (E2 + A) - B * G1 * (9 * COS (ESTR) + (1/3) * COS (3 * ESTR))
F =.5 + B * (9 * SIN (ESTR) + SIN (3 * ESTR))
FS = B * (9 * COS (ESTR) + 3 * SIN (3 * ESTR)) / G1
H = H1 + 2 * R - 2 * SQR (R ^ 2 - X2 ^ 2)
PSI = - V0 * H0 * E1/H
HS = 2 * X2/ (SQR (R ^ 2 - X2 ^ 2))
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - X2 ^ 2) ^ 3)
V1 = V0 * H0 * E1 * HS * F / H ^ 2
V2 = V0 * H0 / H
KSI11 = V0 * H0 * HS * F / H ^ 2
KSI12 = V0 * H0 * E1 * (HSS * F + HS * FS - 2 * HS ^ 2 * FS ^ 2/H) / H ^ 2
END IF
IF E2 > EH1 AND E2 <= EF1 THEN
F = 1
FS = 0
H = H1 + 2 * R - 2 * SQR (R ^ 2 - E2 ^ 2)
PSI = - V0 * H0 * E1/H
HS = 2 * E2/SQR (R ^ 2 - E2 ^ 2)
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - E2 ^ 2) ^ 3)
H = H1 + 2 * R - 2 * SQR (R ^ 2 - E2 ^ 2)
V1 = V0 * H0 * E1 * 2 * E2/ (H ^ 2 * SQR (R ^ 2 - E2 ^ 2))
V2 = V0 * H0 / H
KSI11 = V0 * H0 * HS * F / H ^ 2
KSI12 = V0 * H0 * E1 * (HSS * F + HS * FS - 2 * HS ^ 2 * FS ^ 2/H) / H ^ 2
END IF
IF E2 > EF1 AND E2 <= EF THEN
A = EF1
B = - .0625
G1 = 2 * (EF1 - EF) / PI
ESTR = (2 * E2 - EF - EF1) / G1
X2 =.5 * (E2 + A) - B * G1 * (9 * COS (ESTR) + (1/3) * COS (3 * ESTR))
F =.5 + B * (9 * SIN (ESTR) + SIN (3 * ESTR))
FS = B * (9 * COS (ESTR) + 3 * SIN (3 * ESTR)) / G1
H = H1 + 2 * R - 2 * SQR (R ^ 2 - X2 ^ 2)
PSI = - V0 * H0 * E1/H
HS = 2 * X2/ (SQR (R ^ 2 - X2))
HSS = 2 * R ^ 2/SQR ( (R ^ 2 - E2 ^ 2) ^ 3)
V1 = V0 * H0 * E1 * F * HS / H ^ 2
V2 = V0 * H0 / H
KSI11 = V0 * H0 * HS * F / H ^ 2
KSI12 = V0 * H0 * E1 * (HSS * F + HS * FS - 2 * HS ^ 2 * FS ^ 2/H) / H ^ 2
END IF
IF E2 > EF AND E2 <= EP THEN
PSI = - V0 * H0 * E1/H1: V1 = 0: V2 = V0 * H0 / H1: H = H1
KSI11 = 0: KSI12 = 0
H = H1
END IF
IF PSI > PSIP GOTO 78
GOTO 40
'PRINT "V1 = "; V1; "V2 = "; V2
FI = 0: DFIDE2 = 0: DFIDP = 0: DFIDP2 = 0: D2FIDE22 = 0: D2FIDPDE2 = 0
FIE = (1 - E2/EP) * (E2/EP - EM / EP)
FIP = (1 - PSI / PSIP) * (PSI - PSIM)
DFIEDE = (1/EP) * (EM / EP + 1 - 2 * E2/EP)
DFIPDP = PSIM / PSIP + 1 - 2 * PSI / PSIP
D2FIEDE2 = - 2/EP
D2FIPDP2 = - 2/PSIP
FOR I = 3 TO N - 2
FOR K = 3 TO N - 2
FI = FI + Z (I) * FIP ^ I * FIE ^ K
DFIDE2 = DFIDE2 + K * Z (I) * FIP ^ I * DFIEDE * FIE ^ (K - 1)
DFIDP = DFIDP + I * Z (I) * DFIPDP * FIP ^ (I - 1) * FIE ^ K
'PRINT FIE, FIP, PSI, PSIP
'INPUT FF
DFIDP2 = DFIDP2 + I * Z (I) * (D2FIPDP2 * FIP ^ (I - 1) + (I - 1) * DFIPDP ^ 2 * FIP ^ (I - 2)) * FIE ^ K
D2FIDE22 = D2FIDE22 + K * Z (I) * (D2FIEDE2 * FIE ^ (K - 1) + (K - 1) * DFIEDE ^ 2 * FIE ^ (K - 2)) * FIP ^ I
D2FIDPSIDE2 = D2FIDPSIDE2 + I * K * Z (I) * FIP ^ (I - 1) * DFIPDP * FIE ^ (K - 1) * DFIEDE
'PRINT "DFIDP="; DFIDP; "DFIDE2="; DFIDE2; "FIP="; FIP
'PRINT "FIE="; FIE; "DFIPDP="; DFIPDP; '"PSI="; PSI
'PRINT "EP="; EP; "EM="; EM; "E2="; E2
'INPUT FF
NEXT K
NEXT I
PSIB = PSI + FI
VB1 = V1 * (1 + DFIDP) + DFIDE2: VB2 = V2 * (1 + DFIDP)
KSIB11 = KSI11 * (1 + DFIDP) - V1 * V2 * DFIDP2 - V2 * D2FIDPSIDE2
KSIB12 = KSI12 * (1 + DFIDP) +.5 * ( (V1 ^ 2 + V2 ^ 2) * DFIDP2 + V1 * D2FIDPSIDE2 + D2FIDE2)
40 H11 = Z (N) * H1: M2 = 2 * LD / (H0 - H01 + H1 - H11)
EPS2 = (H0 - H01 - H1 + H11) / (H0 - H01)
MUMC = 2 * EPS2/ (2 - EPS2) / M2
EC = - Z (N - 1) * LD
PSIF = V0 * H0 * (H1/2 - H11) / H1
'PSIM = - PSIP
ET = PI * (E2 - EC) / (2 * (EM - EC))
B1 = (PSIF - PSIS) / (PSIS - PSIP)
BC =.5 +.0625 * (9 * SIN (ET) + SIN (3 * ET))
PSICT = (PSIF + PSIP * B1 * BC) / (1 + B1 * BC)
B2 = (PSIF - PSIP) * B1/ (PSIF - PSIM + (PSIP - PSIM) * B1 * BC)
DBCDE =.0625 * (9 * COS (ET) + 3 * COS (3 * ET)) * PI / (EH - EC)
D2BCDE2 = - .5625 * (SIN (ET) + SIN (3 * ET)) * (PI / (EH - EC)) ^ 2
DB2DBC = - B2/BC
DB2dE = - DBCDE * B2/BC
D2B2DBCDE = - (DB2dE * BC - B2 * DBCDE) / BC ^ 2
D2B2DE2 = D2BCDE2 * DB2DBC + DBCDE2 * D2B2DBCDE
PSI1 = PSI + B1 * (PSIP - PSI) * BC
PSI2 = PSI + B2 * (PSI - PSIM) * BC
IF E2 >= EC THEN
'PRINT "E2="; E2; "EC="; EC
'INPUT FF
GOTO 32
END IF
IF ET1 <= - .5 * H0 + H01 THEN
V11 = V1 * (1 + B1 * BC) + B1 * (PSI - PSIP) * DBCDE
V21 = V2 * (1 + B1 * BC)
KSI111 = KSI11 * (1 + B1 * BC) - V2 * B1 * DBCDE
KSI121 = KSI12 * (1 + B1 * BC) + B1 * (V1 * DBCDE +.5 * (PSI - PSIP) * D2BCDE2)
VT1 = V11: VT2 = V21
ELSE
V12 = V1 * (1 + B2 * BC) + (PSI - PSIM) * (BC * DB2dE + DBCDE * B2)
V22 = V2 * (1 + B2 * BC)
KSI112 = KSI11 * (1 + B2 * BC) - V2 * (BC * DB2dE + DBCDE * B2)
KSI122 = KSI12 * (1 + B2 * BC) + V1 * (BC * DB2dE + DBCDE * B2) +.5 * (PSBI - PSIP) * (D2B2DE2 * BC + 2 * DB2dE * DBCDE + B2 * D2BCDE2)
VT1 = V12: VT2 = V22
END IF
GOTO 33
V11 = VB1 * (1 + B1 * BC) + B1 * (PSBI - PSIP) * DBCDE
V21 = VB2 * (1 + B1 * BC)
V12 = VB1 * (1 + B2 * BC) + (PSBI - PSIM) * (BC * DB2dE + DBCDE * B2)
V22 = VB2 * (1 + B2 * BC)
KSI111 = KSIB11 * (1 + B1 * BC) - VB2 * B1 * DBCDE
KSI121 = KSIB12 * (1 + B1 * BC) + B1 * (VB1 * DBCDE +.5 * (PSBI - PSIP) * D2BCDE2)
KSI112 = KSIB11 * (1 + B2 * BC) - VB2 * (BC * DB2dE + DBCDE * B2)
KSI122 = KSIB12 * (1 + B2 * BC) + VB1 * (BC * DB2dE + DBCDE * B2) +.5 * (PSBI - PSIP) * (D2B2DE2 * BC + 2 * DB2dE * DBCDE + B2 * D2BCDE2)
GOTO 13
32 VT1 = V1: VT2 = V2
33 DE2 = DT * VT2
DE1 = DT * VT1
E2 = E2 + DE2
E1 = E1 + DE1
IF E2 <= EF GOTO 31
ET1 = ET1 + DET
IF PSUO <= PMAX GOTO 61
PMAX = PSUO: X1PMAX = E1: X2PMAX = E2
GOTO 62
61 IF PSUO >= PMIN GOTO 62
PMIN = PSUO: X1PMIN = E1: X2PMIN = E2
62 W1 (I, K) = V1
IF V1 <= V1MAX GOTO 63
V1MAX = V1: X1V1MAX = E1: X2V1MAX = E2
GOTO 64
63 IF V1 >= V1MIN GOTO 64
V1MIN = V1: X1V1MIN = E1: X2V1MIN = E2
64 W2 (I, K) = V2
IF V2 <= V2MAX GOTO 65
V2MAX = V2: X1V2MAX = E1: X2V2MAX = E2
GOTO 66
65 IF V2 >= V2MIN GOTO 66
V2MIN = V2: X1V2MIN = E1: X2V2MIN = E2
66 IF K11 <= K1MAX GOTO 67
K1MAX = K11: X1K1MAX = E1: X2K1MAX = E2
GOTO 68
67 IF K11 >= K1MIN GOTO 68
K1MIN = K11: X1K1MIN = E1: X2K1MIN = E2
68 IF K12 <= K2MAX GOTO 69
K2MAX = K12: X1K2MAX = E1: X2K2MAX = E2
GOTO 70
69 IF K12 >= K2MIN GOTO 70
K2MIN = K12: X1K2MIN = E1: X2K2MIN = E2
70 K1 (I, K) = K11: K2 (I, K) = K12: H (I, K) = ETA: GAM (I, K) = GAMMA
IF ETA <= HMAX GOTO 71
HMAX = ETA: X1HMAX = E1: X2HMAX = E2
GOTO 72
71 IF ETA >= HMIN GOTO 72
HMIN = ETA: X1HMIN = E1: X2HMIN = E2
72 IF GAMMA <= GMAX GOTO 73
GMAX = GAMMA: X1GMAX = E1: X2GMAX = E2
GOTO 79
73 IF GAMMA >= GMIN GOTO 79
GMIN = GAMMA: X1GMIN = E1: X2GMIN = E2
GOTO 79
74 KU = BKU + AKU * KSI: KT = BKT + AKT * TET: KE = BKE + AKE * EPS
TAU = KT * KU * KE * TOD: DTET = TAU * ETA * DT / C0 / RO /.427
TET = TET + DTET: LA = LA + ETA * DT: E1 = E1 - DE1: E2 = E2 - DE2
IF E2 >= EM GOTO 52
T (I, K) = TET
IF TET <= TMAX GOTO 75
TMAX = TET: X1TMAX = E1: X2TMAX = E2
GOTO 76
75 IF TET >= TMIN GOTO 76
TMIN = TET: X1TMIN = E1: X2TMIN = E2
76 LAMB (I, K) = LA
IF LA <= LMAX GOTO 77
LMAX = LA: X1LMAX = E1: X2LMAX = E2
GOTO 79
77 IF LA >= LMIN GOTO 79
LMIN = LA: X1LMIN = E1: X2LMIN = E2
GOTO 79
78 P (I, K) = 9000: W1 (I, K) = 9000: W2 (I, K) = 9000: GAM (I, K) = 9000
K1 (I, K) = 9000: K2 (I, K) = 9000: H (I, K) = 9000: T (I, K) = 9000: LAMB (I, K) = 9000
79 PRINT K, I, LAMB (I, K)
E2 = E2 + DE2: I = I + 1
IF I > P2 GOTO 80
IF ET2 <= EP GOTO 31
80 E1 = E1 + DE1: K = K + 1
IF K > P1 GOTO 81
IF ET1 <= 0 GOTO 50
81 M2 = K - 1: M1 = I - 1
P (I, K) = PSI
IF PSUU <= PMAX GOTO 94
PMAX = PSUU: X2PMAX = E2: X3PMAX = E3
GOTO 95
94 IF PSUO >= PMIN GOTO 95
PMIN = PSUU: X2PMIN = E2: X3PMIN = E3
95 W3 (I, K) = V3
IF V3 <= V3MAX GOTO 96
V3MAX = V3: X3V3MAX = E3: X2V3MAX = E2
GOTO 97
96 IF V3 >= V3MIN GOTO 97
V3MIN = V3: X3V3MIN = E3: X2V3MIN = E2
97 W2 (I, K) = V2
IF V2 <= V2MAX GOTO 98
V2MAX = V2: X3V2MAX = E3: X2V2MAX = E2
GOTO 99
98 IF V2 >= V2MIN GOTO 99
V2MIN = V2: X3V2MIN = E3: X2V2MIN = E2
99 IF K33 <= K3MAX GOTO 100
K3MAX = K33: X3K3MAX = E3: X2K3MAX = E2
GOTO 101
100 IF K33 >= K3MIN GOTO 101
K3MIN = K33: X3K3MIN = E3: X2K3MIN = E2
101 IF K23 <= K2MAX GOTO 102
K2MAX = K23: X3K2MAX = E3: X2K2MAX = E2
GOTO 103
102 IF K23 >= K2MIN GOTO 103
K2MIN = K23: X3K2MIN = E3: X2K2MIN = E2
103 K1 (I, K) = K33: K2 (I, K) = K23: H (I, K) = ETA: GAM (I, K) = GAMMA
IF ETA <= HMAX GOTO 104
HMAX = ETA: X3HMAX = E3: X2HMAX = E2
GOTO 105
104 IF ETA >= HMIN GOTO 105
HMIN = ETA: X3HMIN = E3: X2HMIN = E2
105 IF GAMMA <= GMAX GOTO 106
GMAX = GAMMA: X1GMAX = E1: X2GMAX = E2
GOTO 112
106 IF GAMMA >= GMIN GOTO 112
GMIN = GAMMA: X1GMIN = E1: X2GMIN = E2
GOTO 112
107 KU = BKU + AKU * KSI: KT = BKT + AKT * TET: KE = BKE + AKE * EPS
TAU = KT * KU * KE * TOD: DTET = TAU * ETA * DT / C0 / RO /.427
TET = TET + DTET: LA = LA + ETA * DT: E3 = E3 - DE3: E2 = E2 - DE2
IF E2 >= EM GOTO 85
T (I, K) = TET
IF TET <= TMAX GOTO 108
TMAX = TET: X1TMAX = E1: X2TMAX = E2
GOTO 109
108 IF TET >= TMIN GOTO 109
TMIN = TET: X1TMIN = E1: X2TMIN = E2
109 LAMB (I, K) = LA
IF LA <= LMAX GOTO 110
LMAX = LA: X1LMAX = E1: X2LMAX = E2
GOTO 112
110 IF LA >= LMIN GOTO 112
LMIN = LA: X1LMIN = E1: X2LMIN = E2
GOTO 112
111 P (I, K) = 9000: W1 (I, K) = 9000: W2 (I, K) = 9000: GAM (I, K) = 9000
K1 (I, K) = 9000: K2 (I, K) = 9000: H (I, K) = 9000: T (I, K) = 9000: LAMB (I, K) = 9000
112 PRINT K, I, LAMB (I, K)
ET2 = ET2 - DX2: I = I + 1
IF I > P2 GOTO 113
IF ET2 >= EM GOTO 84
113 ET3 = ET3 + DX3: K = K + 1
IF K > P1 GOTO 114
IF ET3 <= 0 GOTO 83
114 M2 = K - 1: M1 = I - 1
RETURN
164 '" Пoдпрoгpaммa пoстрoения изoлиний "
O$ = " ": Y$ = "X"
FOR M = 1 TO M2
PRINT Y$;
PRINT #1, Y$;
KR = 0
FOR L = 1 TO M1
IF LAMB (L, M) > LN AND KR = 0 GOTO 185
IF LAMB (L, M) > LN AND KR > 0 GOTO 184
RA = (LAMB (L, M) - LMIN) / DV
IF RA > 1 GOTO 165
S$ = "A"
GOTO 183
165 IF RA > 2 GOTO 166
GOTO 184
166 IF RA > 3 GOTO 167
S$ = "B"
GOTO 183
167 IF RA > 4 GOTO 168
GOTO 184
168 IF RA > 5 GOTO 169
S$ = "C"
GOTO 183
169 IF RA > 6 GOTO 170
GOTO 184
170 IF RA > 7 GOTO 171
S$ = "D"
GOTO 183
171 IF RA > 8 GOTO 172
GOTO 184
172 IF RA > 9 GOTO 173
S$ = "E"
GOTO 183
173 IF RA > 10 GOTO 174
GOTO 184
174 IF RA > 11 GOTO 175
S$ = "F"
GOTO 183
175 IF RA > 12 GOTO 176
GOTO 184
176 IF RA > 13 GOTO 177
S$ = "H"
GOTO 183
177 IF RA > 14 GOTO 178
GOTO 184
178 IF RA > 15 GOTO 179
S$ = "R"
GOTO 183
179 IF RA > 16 GOTO 180
GOTO 184
180 IF RA > 17 GOTO 181
S$ = "Q"
GOTO 183
181 IF RA > 18 GOTO 182
GOTO 184
182 IF RA > 19 GOTO 184
S$ = "U"
183 PRINT S$;
PRINT #1, S$;
GOTO 186
184 PRINT O$;
PRINT #1, O$;
GOTO 186
185 KR = 2
PRINT Y$;
PRINT #1, Y$;
186 NEXT L
IF KR > 0 GOTO 187
PRINT Y$
PRINT #1, Y$
GOTO 189
187 PRINT O$
PRINT #1, O$
189 NEXT M
RETURN
Размещено на Allbest.ru
Подобные документы
Сварка как технологический процесс получения неразъемных соединений в результате возникновения атомно-молекулярных связей между деталями. Специфика сварки плавлением и давлением. Особенности видов сварки, используемых на судоремонтных предприятиях.
реферат [463,3 K], добавлен 11.12.2014Описание способа сварки неплавящимся электродом в защитных газах корневых слоев сварных соединений. Анализ изобретений в области сварки. Изучение основных приемов и методов теории решения изобретательских задач, позволяющих устанавливать системные связи.
курсовая работа [41,5 K], добавлен 26.10.2013Физическая сущность процесса сварки, её классификация. Сущность основных способов сварки плавлением и область их рационального применения. Основные способы сварки давлением. Источники питания для сварки. Влияние сварочных процессов на свариваемый металл.
курсовая работа [4,5 M], добавлен 16.07.2013Описание основного материала. Трудности и особенности сварки сплава АМг-6. Выбор и обоснование способа и режимов сварки, разделки кромок, сварочных материалов и оборудования. Специальные технологические материалы, условия и особенности их применения.
курсовая работа [279,5 K], добавлен 17.01.2014Физическая сущность процесса сварки и ее классы: термический, термомеханический и механический. Остаточные сварочные напряжения и деформация. Описание используемого оборудования, инструментов и приспособлений сварки стола. Виды применяемых материалов.
реферат [277,7 K], добавлен 21.02.2015Характеристика металла для конструкции балки, оценка его свариваемости. Характеристика дуговой сварки: ручной и автоматической, в среде защитных газов. Технологический процесс сборки-сварки. Расчёт ее режимов. Выбор сварочных материалов и оборудования.
дипломная работа [1,4 M], добавлен 19.01.2015Выбор и обоснование способов сварки и сварочных материалов, рода тока и полярности. Характеристика основного металла. Описание механизированного сборочно-сварочного приспособления. Расчет режимов для ручной дуговой и механизированной сварки в среде СО2.
курсовая работа [221,6 K], добавлен 20.01.2014Технология производства сварки. История развития сварочного производства. Специфика аргонно-дуговой сварки и сфера её использования. Применение, преимущества и недостатки аргонно-дуговой сварки. Сравнительная характеристика оборудования этого вида сварки.
реферат [635,2 K], добавлен 18.05.2012Исследование основных видов термической обработки стали: отжига, нормализации, закалки, отпуска. Изучение физической сущности процесса сварки. Технологический процесс электродуговой и электрошлаковой сварки. Пайка и состав оловянно-свинцовых припоев.
реферат [193,4 K], добавлен 22.03.2013Организация рабочего места. Понятие свариваемости сталей. Оборудование, инструменты и приспособления, используемые при газовой сварке. Материалы, применяемые для сварки. Технологический процесс сварки труб с поворотом на 90. Амортизация основных средств.
курсовая работа [831,3 K], добавлен 15.05.2013
