Код на Fortran 2

край нали

Екип

Ръководител

Малко история:

Naviers-Stokes Incomprevable в приближението на Bousinnesq:

$
\ вляво \ \ начало
div (\ vec) В В & = & В 0 \\
\ rho & = & В \ rho_r (1- \ alpha (T-T_r)) \\
\ frac> & = & \ frac \ vec (P) - \ frac \ vec + \ eta \ Delta (\ vec) \\
\ frac & = & \ kappa \ Delta T \\
\ край
\ нали.
$
Система (1)

С твърдите гранични условия:

Параметърът $ A = \ frac $, както и изборът на гранични условия влияят върху стойността на $ Ra_c $.

Потърсете критичния Рейли: $ A = \ frac \ rightarrow \ infty $

Проводимо състояние:

В този случай System (1) се интегрира лесно с помощта на $ \ vec= \ vec $ и става:

$
\ вляво \ \ начало
T_c = В T_1- \ fracz \\
\ rho_c = В \ rho_r (1- \ alpha (T_c-T_r)) \\
P_c = P_r- \ rho_r gz + \ rho_r \ alpha g (T_1-T_r) z- \ rho_r \ alpha g \ fracz ^ 2 \\
\ край
\ нали.
$
Система (2)

Чрез промяна на променлива: $ \ left \ TВ = В T_c- \ theta \\ P = В P_c - \ rho_r \ Pi \\\ end \ right. $ За да се вземе предвид "пертурбативният" аспект на проблем.

След това получаваме, като пропускаме * и nottant $ Pr = \ frac $ броя на Prandtl:

$
\ вляво \ \ начало
\ frac + \ frac = 0 \ quad (*) \\
\ frac = - \ frac + Pr \ Delta u \\
\ frac = - \ frac + Pr \ Delta u + Ra Pr \ theta \\
\ frac = w + \ Delta \ theta \\
\ край
\ нали.
$
Система (3)

С граничните условия:

Текуща функция:

$
\ вляво \ \ начало
\ frac = Ra Pr \ frac + Pr \ Delta ^ 2 \ psi \\
\ frac = \ frac + \ Delta \ Theta \\
\ край
\ нали.
$
Система (4)

Проблем със собствената стойност:

Чрез инжектиране на тази форма на решение в системата (4) се получава:

$
\ вляво \ \ начало
s (D ^ 2-k_1 ^ 2) \ Psi = -i k_1 Ra Pr \ Theta + Pr (D ^ 2-k_1) ^ 2 \ Psi \ quad (*) \\
s \ Theta = -i k_1 \ Psi + (D ^ 2-k_1 ^ 2) \ Theta \ quad (**) \\
\ край
\ нали.
$

С: $ \ Theta = 0 \ text \ Psi = 0 \ text< et >D \ Psi = 0 \ quad \ text $ (пишем $ D = \ frac $)

$ [s- (D ^ 2-k_1 ^ 2)] [s-Pr (D ^ 2-k_1 ^ 2)] (D ^ 2-k_1 ^ 2) \ Psi = -k_1 ^ 2 Ra Pr \ Psi $

И тъй като $ \ Psi = 0 $ за $ z = 0 $ или $ z = 1 $ граничните условия стават:

Рейли критикува:

С $ (D ^ 2-k_1 ^ 2) ^ 2 \ Psi = 0, \ Psi = 0 \ текст< et >D \ Psi = 0 $ при z = 0 и z = 1.

За удобство на това, което следва, ще преведем от тази точка произхода на $ z $ в средата на домейна и следователно граничните условия ще бъдат съответно в $ z = -1/2 $ и $ z = 1/2 $.

Чрез задаване на $ k_1 ^ 2Ra = \ tau ^ 3k_1 ^ 6 $ намираме:

Което ни дава режимите:

$ \ начало
cos \ frac12 q_0 & cosh \ frac12 q & cosh \ frac12 q ^ * \\
-q_0sin \ frac12 q_0 & q sinh \ frac12 q & В q ^ * sinh \ frac12 q ^ * \\
cos \ frac12 q_0В & \ frac12 (i \ sqrt-1) cosh \ frac12 q & - \ frac12 (i \ sqrt + 1) cosh \ frac12 q ^ *
\ край
\ begin A_0 \\ A \\ A ^ * \ end = 0 $

Тогава функцията $ Ra (k_1) $ допуска минимум в $ k_1 = 3.117 $, което съответства на критичния релей, защото е първата, достигната във фазата на нагряване.