Моделирование топки пылеугольного котла с целью повышения эффективности сжигания топлива

Курсовой проект - Разное

Другие курсовые по предмету Разное

?сунок 2.4.2.4 - Концентрация летучих по осям XYZ

Рисунок 2.4.2.5 - Концентрация кислорода (О2)

 

Рисунок 2.4.2.6 - Концентрация кислорода(О2) по осям XYZ

 

Рисунок 2.4.2.7 - Концентрация оксида углерода (СО)

 

Рисунок 2.4.2.8 - Концентрация оксида углерода (СО) по осям XYZ

 

Рисунок 2.4.2.9 - Концентрация двуокиси углерода (СО2) по осям XYZ

 

Рисунок 2.4.2.10 - Концентрация двулокиси углерода (СО2) по осям XYZ

2.4.3 Траектория движения частиц топлива

 

Рисунок 2.4.3.1 - Траектория движения частиц топлива

 

Рисунок 2.4.3.2 - Траектория движения частиц топлива по осям XYZ

топочный скорость коксовый горение

2.5 Анализ полученных данных

 

К сожалению, программа была доступна лишь в демо-режиме и не смогла в полной мере раскрыть свой потенциал, но то, что было увидено позволяет сказать, что SigmaFlame достаточно мощный пакет для расчета топочных процессов.

Из полей температур (рисунки 2.4.1.1 - 2.4.1.3) видно, что ядро факела набрасывается на заднюю стенку топки, что может привести к шлакованию поверхностей нагрева и пережогу труб.

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

По концентрации кислорода (рисунок 2.4.2.5-2.4.2.6) можно сделать вывод о том, что топка достаточно узкая и струи будут налезать друг на друга, хотя теплонапряжение в сечении в пределах нормы.

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

 

 

Литература

 

1. Основы практической теории горения: под ред. В.В. Померанцева. Л.: Энергоатомиздат, 1986. 309 с.

. Бабий В.И., Куваев Ю.Ф. Горение угольной пыли и расчет пылеугольного факела. М.: Энергоатомиздат, 1986. 208 с.

 

 

Приложение

 

Текст программы Движение частицы, написанной в среде программирования Delphi

 

unitUnit_m;, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,, ExtCtrls, ComCtrls, TeeProcs, TeEngine, Chart, Buttons, Series;= class(TForm): TPageControl;: TTabSheet;: TTabSheet;: TImage;: TButton;: TChart;: TChart;: TBitBtn;: TLineSeries;: TLineSeries;: TChart;: TLineSeries;Button1Click(Sender: TObject);BitBtn1Click(Sender: TObject);(Sender: TObject);

{ Private declarations }

{ Public declarations };: TForm1;, x, y, dTm, Vx, Vy, Nu, Tg, Re, C, Rog, Wx, Wy, dVx, dVy, Ht,, f, d, m, g, hg, msh, bt, Alfa2t, Ta,T2t,O2,O2t,dd,Kgk,Ak,DenKo : real;,yg,xt: integer;

{$R *.DFM}f_Vkin (Tg: real) :real; //--------------------------------_Vkin:=(4.794E-05*Tg*Tg + 1.099E-01*Tg + 8.185)/1e6;; //----------------------------------------------------------------f_Tg (y: real):real;,b : real;//=======================================:=(T2t-0.8*Ta)/(Ht-hg);:= 0.8*Ta-a*hg;y>hg then f_Tg:=b+y*a_tg:=0.8*Ta;;

//=====================================================

===========

f_O2 (y: real):real;,b : real;//=======================================:=(O2t-21)/(Ht-hg);:=21-a*hg;y>hg then f_O2:=a*y+bf_O2:=21;;

//=====================================================

===========TForm1.FormActivate(Sender: TObject); //----------------------:=39;:=10;:=1800;t:=1081;t:=1.2;t:=21-21/Alfa2t;; //-------------------------------------------------------------------TForm1.Button1Click(Sender: TObject);//----------------------------:=9;:=0;:=0.00001;:=6;:=0;:=0.009;:=10;:=310e-6;:=10;:=9.8;:=1;:=4.7;:=1477;:=Ht/image1.height;:=round(bt/msh);.Image1.Canvas.MoveTo(xt,0);.Image1.Canvas.LineTo(xt,image1.height);:=round(x/msh);:=image1.Height-round(y/msh);.Image1.Canvas.Pixels[xg,yg]:=ClRed ;

// 0ABS(y-hg)<0.5 then Wx:=6:=0;

//:=f_Tg(y);:=29/22.4*273/(273+Tg);:=f_Vkin(Tg);:=f_O2(y);

//:=1/(Kgk*4.42e8*(100-Ak)/100)*exp(0.9*ln(Tg+273))*O2/(d*DenKo);:=d-dd*dTm;

//:= Pi*d*d/4;:= 1/6*Pi*d*d*d*DenKo;

Ht) or (yHt) or (y<0) or (d<20e-6);.Caption:=h=+floattostr(y) + d=+ floattostr(d*1e6);; //---------------------------------------------------------------TForm1.BitBtn1Click(Sender: TObject); //-----------------------:integer;, Nu, y : real;i:=100 to 2200 do begin:=i;:=f_Vkin(Tg)*1e6;.Chart1.Series[0].AddXY(Tg,Nu,,clRed);

//=====================================================

===========i:=0 to round(Ht) do begin:=i;:=f_Tg(y);.Chart2.Series[0].AddXY(y, Tg,,clRed) ;;

//=====================================================

===========i:=0 to round(Ht) do begin:=i;:=f_O2(y);.Chart3.Series[0].AddXY(y, O2,,clRed) ;

end;end;//--------------------------------------------------------------------