
- •Введение
- •1. Запуск математического пакета maple, структура окна
- •2. Описание основных команд–процедур пакета maple
- •2.1. Арифметические операции, типы данных в Maple
- •2.2. Структура команд Maple
- •Команда (параметр_1, параметр_2, …, параметр_n);
- •2.3. Преобразование математических выражений
- •2.3.1. Выделение частей арифметических выражений
- •2.3.2. Тождественные преобразования арифметических выражений
- •Collect(выражение, имя переменной относительно которой приводятся подобные);
- •3. Функции maple, решение уравнений и неравенств
- •3.1. Способы задания функций и замена переменных
- •Piecewise(cond_1,f1,cond_2,f2, …).
- •3.2. Операции оценивания
- •3.3. Решение уравнений и их систем
- •3.4. Решение неравенств
- •4. Графические и геометрические возможности пакета maple
- •4.1. Графические возможности пакета Maple
- •4.1.1. Двумерная графика
- •Polarplot ([переменная, выражение,параметры переменной],опции);
- •Pointplot(data_list,опции);
- •Sphereplot ((выражение), параметры_, параметры_, опции);
- •Sphereplot ([r_выражение, _выражение, _выражение], параметр_1, параметр_2, опции);
- •4.1.2. Трехмерная графика
- •4.2. Анимация
- •4.3. Геометрические пакеты Maple
- •4.3.1. Стереометрия
- •4.3.2. Планиметрия
- •5. Дифференциальное и интегральное исчисление функции одной переменной
- •5.1. Вычисление пределов в Maple для некоторых математических операций существует по две команды: прямого и отложенного исполнения. Имена команд состоят из одинаковых букв за исключением первой:
- •5.2. Дифференцирование
- •5.2.1. Вычисление производных
- •5.2.2. Дифференциальный оператор
- •5.3. Исследование функций
- •5.3.1. Непрерывность функции и точки разрыва
- •5.3.2. Экстремумы. Наибольшее и наименьшее значение функции
- •5.3.3. Исследование функции по общей схеме
- •{Arctan(0)}
- •6. Интегрирование
- •6.1. Аналитическое и численное интегрирование
- •6.2. Определенные интегралы
- •Is assumed to be: RealRange(Open(-1),3)
- •6.3. Основные методы интегрирования
- •7. Дифференциальные уравнения
- •7.1. Аналитическое решение дифференциальных уравнений
- •7.1.1. Общее решение дифференциальных уравнений
- •7.1.2. Фундаментальная (базисная) система решений
- •7.1.3. Решение задачи Коши или краевой задачи
- •7.1.4. Системы дифференциальных уравнений
- •7.1.5. Приближенное решение дифференциальных уравнений с помощью степенных рядов
- •7.2. Численное решение дифференциальных уравнений
- •7.2.1. Формат команд dsolve и odeplot для нахождения численного решения дифференциальных уравнений в графическом виде
- •Italic, 12]):
- •Italic, 12]):
- •7.2.2. Пакет графического представления решений дифференциальных уравнений dEtools
- •7.2.3. Построение фазовых портретов систем дифференциальных уравнений
- •8. Функции многих переменных, векторный анализ, ряды, интегральные преобразования
- •8.1. Дифференциальное исчисление функций многих переменных
- •8.1.1. Частные производные
- •8.1.2. Локальные и условные экстремумы функций многих переменных
- •Maximize(f,{x1,…,xn},range);
- •Minimize(f,{x1,…,xn}, range);
- •8.2. Интегральное исчисление функций многих переменных
- •8.3. Векторный анализ
- •8.4. Ряды и произведения
- •8.4.1. Вычисление суммы ряда и произведений
- •8.4.2. Разложение функции в степенной ряд и ряд Тейлора
- •8.5. Интегральные преобразования
- •8.5.1. Преобразование Фурье
- •8.5.2. Преобразование Лапласа
- •9. Линейная алгебра
- •9.1. Векторная алгебра
- •Warning, the protected names norm and trace have been redefined and unprotected
- •9.2. Действия с матрицами
- •9.2.1. Определение матрицы
- •9.2.2. Арифметические операции с матрицами
- •9.2.3. Определители, миноры и алгебраические дополнения, ранг и след матрицы
- •9.2.4. Обратная и транспонированная матрицы
- •Evalm(1/a);
- •Inverse(a).
- •9.2.5. Определение типа матрицы
- •1*Sqrt(3)/2,-1/2]]);
- •9.2.6. Функции от матриц
- •9.3. Спектральный анализ матрицы
- •9.4. Системы линейных уравнений, матричные уравнения
- •For имя переменной цикла in выражение 1 do выражение 2 od;
- •10.3. Процедуры-функции
- •10.4. Процедуры
- •Writeto (“имя файла”)
- •Appendto (“имя файла”)
- •Print(список Maple-выражений, перечисляемых через запятую);
- •Lprint(список Maple-выражений, перечисляемых через запятую);
- •Readdata(“имя файла”, тип переменной(integer/float – последний тип устанавливается по умолчанию),счетчик чисел);
- •Readlib(readdata):
- •12. Использование математического пакета maple для научных исследований
- •12.1. Исследование влияния изменяемых параметров плоской помольной камеры мельницы противоточного действия на скорость энергоносителя
- •12.1.1. Постановка задачи
- •12.1.2. Решение задачи
- •12.2. Определение коэффициента полезного заполнения материалом деформируемых бочкообразных камер устройств для тонкого и свертонкого помола материалов
- •12.2.1. Расчетная схема
- •12.2.2. Решение задачи
- •12.3. Исследование влияния основных конструктивных и технологических параметров на режимы работы трубной мельницы
- •Formula(1.8)
- •Formula(1.9)
- •Formula(2.1)
- •Formula(2.2)
- •Formula(2.3)
- •Formula(3.1)
- •Formula(3.2)
- •Formula(3.3)
- •13. Формат наиболее используемых команд аналитического пакета maple
- •Заключение
- •Библиографический список
- •Оглавление
12.3. Исследование влияния основных конструктивных и технологических параметров на режимы работы трубной мельницы
Необходимо произвести изучение режимов работы трубной мельницы в зависимости от конструктивных и технологических параметров. Это удобно сделать в четыре этапа:
1. Определить работу необходимую:
а) для подъема мелющих тел на определенную высоту, начиная с которой они движутся по параболической траектории;
б) для сообщения шарам кинетической энергии.
2. Найти зависимость полной работы за один оборот мельницы.
3. установить расход мощности в зависимости от радиуса и доли критической скорости вращения барабана мельницы.
4. Выполнить расчет производительности мельницы, учитывая ее конструктивные и технологические параметры.
Решение задачи.
1. Введем выражения, определяющие зависимости, для перечисленных работ:
[> restart;
[> lprint(Formula (1.1)); A[1]:=G*Y[B];
Formula(1.1)
A[1] := G Y[B]
[> lprint(Formula (1.2)); A[2]:=G*v^2/(2*g);
Formula(1.2)
G – сила тяжести мелющих тел, Н:
[>lprint(Formula(1.3));G:=phi*mu*rho*Pi*R^2*L*g;
Formula(1.3)
Пусть Y[B] – высота подъема мелющих тел от точки отрыва до точки падения, м:
[>lprint(Formula(1.4));
Y[B]:=4*R[0]*(1-psi^4)*psi^2;
Formula(1.4)
– скорость движения
мелющих тел редуцированного слоя на
круговой траектории, м/с е к:
[> lprint(Formula (1.5)); v:=2*Pi*R[0]*n;
Formula(1.5)
:= 2 Pi R[0] n
n – частота вращения барабана, об/с е к:
[> lprint(Formula (1.6)); n:=0.5*psi/sqrt(R);
Formula(1.6)
R[0] – радиус траектории движения мелющих тел редуцированного слоя на круговой траектории, м/сек:
[> lprint(Formula (1.7)); R[0]:=0.866*R;
Formula(1.7)
R[0] := 0.866 R
φ – коэффициент загрузки мельницы (φ = 0,26...0,32);
μ – коэффициент разрыхления загруки (для шаров μ = 0,575);
ρ – плотность мелющих тел (для стали ρ = 7800 кг/м3);
g – ускорение свободного падения (9,8 м/с2);
R – радиус барабана "в свету" (R = 1,22 м);
L – длина барабана мельницы (L = 13,04м).
Подставим формулы (1.3), (1.4), (1.5), (1.6), (1.7) в первоначальные формулы работ (1.1), (1.2) и получим окончательные расчетные выражения:
[> lprint(Formula (1.8)); A[1];
Formula(1.8)
A[1]:=3.464R3Lg(1-4)2
[> lprint(Formula (1.9)); A[2];
Formula(1.9)
A[2]:=0.3749783R3L2
Произведем исследование изменения формул работ (1.8), (1.9) в зависимости от коэффициента загрузки, используя вычислительный циклический процесс.
В случае п.1., а: =0,26…0,32 с шагом 0,01.
[> for phi from 0.26 by 0.01 while phi<=0.32 do A[1];od;
0.90064R3Lg(1-4)2
0.93528R3Lg(1-4)2
0.96992R3Lg(1-4)2
1.00456R3Lg(1-4)2
1.03920R3Lg(1-4)2
1.07384R3Lg(1-4)2
1.10848R3Lg(1-4)2
В случае п1., б: =0,26…0,32 с шагом 0,01.
[> for phi from 0.26 by 0.01 while phi<=0.32 do A[2];od;
0.097494283R3L2
0.101244063R3L2
0.104993843R3L2
0.108743623R3L2
0.112493403R3L2
0.116243183R3L2
0.119992963R3L2
Произведем подстановку конкретных значений констант и переменных , , , R, L, g в полученные выше выражения для случая а:
[> A1[1]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04, g=9.8}, 0.90064*mu*rho*Pi*R^3*L*g*(1-psi^4)*psi^2):
[> A2[1]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04, g=9.8}, 0.93528*mu*rho*Pi*R^3*L*g*(1-psi^4)*psi^2):
[> A3[1]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04, g=9.8}, 0.96992*mu*rho*Pi*R^3*L*g*(1-psi^4)*psi^2):
[> A4[1]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04, g=9.8}, 1.00456*mu*rho*Pi*R^3*L*g*(1-psi^4)*psi^2):
[> A5[1]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04, g=9.8}, 1.03920*mu*rho*Pi*R^3*L*g*(1-psi^4)*psi^2):
[> A6[1]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04, g=9.8}, 1.07384*mu*rho*Pi*R^3*L*g*(1-psi^4)*psi^2):
[> A7[1]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04, g=9.8}, 1.10848*mu*rho*Pi*R^3*L*g*(1-psi^4)*psi^2):
Построим графики полученных выражений на координатной плоскости ψ0А:
[> with(plots):
[> A11[1]:=plot(A1[1],psi=0.7..1):
[> A22[1]:=plot(A2[1],psi=0.7..1,color=green):
[> A33[1]:=plot(A3[1],psi=0.7..1,color=gray):
[> A44[1]:=plot(A4[1],psi=0.7..1,color=blue):
[> A55[1]:=plot(A5[1],psi=0.7..1,color=gold):
[> A66[1]:=plot(A6[1],psi=0.7..1,color=yellow):
[> A77[1]:=plot(A7[1],psi=0.7..1,color=pink):
[>A88[1]:=textplot([0.82,600000,"Grafiki zavisimosti raboti, neobhodimoi dlya podema"]):
[>A99[1]:=textplot([0.82,500000,"sharov, ot doli kriticheskoi skorosti"]):
[>A00[1]:=textplot([0.71,1400000,"A1"]):
[>display({A11[1],A22[1],A33[1],A44[1],A55[1],A66[1],A77[1], A88[1],A99[1],A00[1]});
Кривые зависимостей работы, совершаемой мельницей по подъему мелющих тел (рис.12.14), носят однотипный характер и имеют точку максимума, которая отвечает примерно одному и тому же значению ψ, независимо от φ.
Рис. 12.14. Кривые зависимостей работы, совершаемой мельницей по подъему мелющих тел
Найдем значения ψ, отвечающие максимуму функций, полученных графиков и сравним их значения:
[> with(Optimization):
[> Maximize(A1[1]);
[1.13343031523000682 106, [ψ = 0.759835685668772464]]
[> Maximize(A2[1]);
[1.17702378886479466 106, [ψ = 0.759835685668022286]]
[> Maximize(A3[1]);
[1.22061726298326301 106, [ψ = 0.759835685667301640]]
[> Maximize(A4[1]);
[1.26421073601345090 106, [ψ = 0.759835685666609528]]
[> Maximize(A5[1]);
[1.30780421025283844 106, [ψ = 0.759835685665944838]]
[> Maximize(A6[1]);
[1.35139768328302704 106, [ψ = 0.759835685665306570]]
[> Maximize(A7[1]);
[1.39499115752241482 106, [ψ =
0.759835685664693948]]
Из проведенного расчета видно, что максимальное значение работы достигается практически при одном и том же значении ψ, а следовательно, максимум работы зависит только от этого параметра.
[> psi:=0.759835686;
:=0.759835686
Зная оптимальное значение доли критической скорости, можно найти угол отрыва шаров:
[> alpha:=evalf(180/(Pi/arccos(psi^2)));
:= 54.73561028
[> psi[optA1]:=0.759835686;
ψ[optA1] := 0.759835686
Произведем подстановку конкретных значений констант и переменных , , , R, L, g в полученные выше выражения для случая б:
[> A1[2]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04}, 0.0974942800*mu*rho*Pi^3*R^3*L*psi^2):
[> A2[2]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04}, 0.1012440600*mu*rho*Pi^3*R^3*L*psi^2):
[> A3[2]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04}, 0.1049938400*mu*rho*Pi^3*R^3*L*psi^2):
[> A4[2]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04}, 0.1087436200*mu*rho*Pi^3*R^3*L*psi^2):
[> A5[2]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04}, 0.1124934000*mu*rho*Pi^3*R^3*L*psi^2):
[> A6[2]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04}, 0.1162431800*mu*rho*Pi^3*R^3*L*psi^2):
[> A7[2]:=subs({mu=0.575, rho=7800, R=1.22, L=13.04}, 0.1199929600*mu*rho*Pi^3*R^3*L*psi^2):
Изобразим полученные зависимости на координатной плоскости ψ0А:
[> with(plots):
[> A11[2]:=plot(A1[2],psi=0.7..1):
[> A22[2]:=plot(A2[2],psi=0.7..1,color=green):
[> A33[2]:=plot(A3[2],psi=0.7..1,color=gray):
[> A44[2]:=plot(A4[2],psi=0.7..1,color=blue):
[> A55[2]:=plot(A5[2],psi=0.7..1,color=gold):
[> A66[2]:=plot(A6[2],psi=0.7..1,color=yellow):
[> A77[2]:=plot(A7[2],psi=0.7..1,color=pink):
[> A88[2]:=textplot([0.835,375000,"Grafiki zavisimosti raboti, potrebnoi dlya soobsheniya sharam"]):
[> A99[2]:=textplot([0.82,350000,"kineticheskoi energii, ot doli kriticheskoi skorosti"]):
[> A00[2]:=textplot([0.71,400000,"A2"]):
[>display(A11[2],A22[2],A33[2],A44[2],A55[2],A66[2],A77[2],A88[2],A99[2],A00[2]);
Из полученных графиков (рис. 12. 15) видно, что работа по подъему мелющих тел возрастает при увеличении ψ на всем интервале, кроме того, при малых значениях Δψ функция близка к линейной зависимости.
Рис. 12.15. Линии работы по подъему мелющих тел
2. Определим зависимость полной работы за один оборот барабана мельницы.
Зададим уравнение полной работы:
[> restart;
[> lprint(Formula (2.1)); A:=A1+A2;