24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 864  |  回复: 4

fq_buct

新虫 (初入文坛)

[求助] 有一段matlab不太理解,求大神解释 已有2人参与

边界层方程流体计算的
viscosity = 18.1e-6; % viscosity
density = 1.19 ;
kvisc = viscosity/density; % kinematic viscosity
Pr = 0.72; % Prandtl number
Umax = 5; % free stream velocity
maxres = 1e-5; % max residual
maxit = 3;
nx = input('Number of increment in x-dir= ')
ny = input('Number of increment in y-dir= ')
ni = nx +1;
nj = ny +1;
% Increment length in y-dir 0.05 - 0.2 mm
% Increment length in x-dir 0.1 - 1.0 mm
dx = input('Increment length in x-dir (mm)= ')
dy = input('Increment length in y-dir (mm)=  ')
dx = dx/1000;
dy = dy/1000;
x=0:dx(ni-1)*dx)
y=0:dynj-1)*dy
% Boundary and initial values
for i=1:ni
   for j=1:nj
      U(i,j)=Umax;
      if j==1; U(i,j)=0; end;
      V(i,j) = 0;
      T(i,j) = 0;
      if j==1; T(i,j)=1.0; end;
   end;
end;  
counter = 0;
for i = 2:ni
   counter = 0;
   sumres = 1;
   while ((sumres > maxres)&(counter < maxit) )
      P(1)=0;Q(1)=0;
      sumres=0;
%% momentuum eqn      
      for j = 2:nj-1
         a = U(i,j)/dx+2*kvisc/dy^2;
         b = kvisc/dy^2-V(i,j)/(2*dy);
         c = kvisc/dy^2+V(i,j)/(2*dy);
         d = U(i,j)*U(i-1,j)/dx;
         P(j)=b/(a-c*P(j-1));
         Q(j)=(c*Q(j-1)+d)/(a-c*P(j-1));
         sumres=sumres+abs(a*U(i,j)-(b*U(i,j+1)+c*U(i,j-1)+d));
      end;
      for j=nj-1:-1:2
         U(i,j) = P(j)*U(i,j+1)+Q(j);
      end;
      P(1)=0;Q(1)=0;
%%continuity eqn.
      for j = 2:nj-1
         a = 1/dy;
         b = 0;
         c = 1/dy;
         d = -((U(i,j)-U(i-1,j))+(U(i,j-1)-U(i-1,j-1)))/(2*dx);
         P(j)=b/(a-c*P(j-1));
         Q(j)=(c*Q(j-1)+d)/(a-c*P(j-1));
         sumres=sumres+abs(a*V(i,j)-(b*V(i,j+1)+c*V(i,j-1)+d));
      end;
      for j=nj-1:-1:2
         V(i,j) = P(j)*V(i,j+1)+Q(j);
      end;
      counter = counter +1; % counts number of iterations   
   end;
   TotalResidual = sumres
end;
for i = 2:ni % Temperature field
   P(1)=0;Q(1)=T(i,1);  % TDMA
%   for j = 2:nj-1
%      a =???
%      b =???
%      c =???
%      d =???
%      P(j)=b/(a-c*P(j-1));
%      Q(j)=(c*Q(j-1)+d)/(a-c*P(j-1));
%    end;
%    for j=nj-1:-1:2
%         T(i,j) = P(j)*T(i,j+1)+Q(j);
%    end;
end;
for i=2:ni
   % calc. Nusselt number and friction factor
end;   
中间的 a = U(i,j)/dx+2*kvisc/dy^2;
         b = kvisc/dy^2-V(i,j)/(2*dy);
         c = kvisc/dy^2+V(i,j)/(2*dy);
         d = U(i,j)*U(i-1,j)/dx;
         P(j)=b/(a-c*P(j-1));
         Q(j)=(c*Q(j-1)+d)/(a-c*P(j-1));
         sumres=sumres+abs(a*U(i,j)-(b*U(i,j+1)+c*U(i,j-1)+d))
这一段是什么意思,a,b,c,d是什么?是动量方程模型吗?
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

编程达人CP3

银虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
哥们,这么大段贴出来,怎么都不会有人耐心给你看的,怎么你也得介绍下。

[ 发自小木虫客户端 ]
加油吧少年!
2楼2015-01-04 07:40:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fq_buct

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by 编程达人CP3 at 2015-01-04 07:40:57
哥们,这么大段贴出来,怎么都不会有人耐心给你看的,怎么你也得介绍下。

计算流体变阶层速度,就是想问下最后一段带入的连续性方程和动量方程是什么模型,abdc、PQ、是什么意思?

[ 发自小木虫客户端 ]
3楼2015-01-04 09:11:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (正式写手)

感谢参与,应助指数 +1
本帖仅楼主可见
4楼2015-01-04 09:47:05
已阅   申请程序强帖   回复此楼   编辑   查看我的主页

fq_buct

新虫 (初入文坛)

引用回帖:
4楼: Originally posted by ultro at 2015-01-04 09:47:05
LZ问的这属于专业问题啊, 估计学过流体的同学才知道怎么回事, 或许到专业板块发帖更合适一点

嗯,谢谢

[ 发自小木虫客户端 ]
5楼2015-01-04 10:42:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 fq_buct 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料与化工363求推荐 +11 zh096 2026-04-04 11/550 2026-04-06 19:14 by guanxin1001
[考研] 277工科求调剂 +8 1915668 2026-04-04 9/450 2026-04-06 15:52 by lin-da
[考研] 081700,311,求调剂 +16 冬十三 2026-04-04 17/850 2026-04-06 14:56 by 尚水阁主
[考研] 288求调剂 +8 没有答案_ 2026-04-05 8/400 2026-04-06 14:11 by lqwchd
[考研] 070300化学学硕311分求调剂 +11 梁富贵险中求 2026-04-04 11/550 2026-04-06 10:43 by 蓝云思雨
[考研] 一志愿郑州大学085600求调剂 +17 吃的不少 2026-04-05 20/1000 2026-04-06 00:32 by T可可西里T
[考研] 086000生物与医药求调剂 +3 老天眷顾之人 2026-03-31 3/150 2026-04-05 22:24 by syh9288
[考研] 08专硕275调剂 +5 AaAa7420 2026-04-05 5/250 2026-04-05 18:01 by jkddd
[考研] 材料化工306分找合适调剂 +14 沧海轻舟e 2026-04-04 14/700 2026-04-05 09:53 by 朱云虎202
[考研] 材料调剂 +9 革微桂 2026-04-04 9/450 2026-04-05 08:27 by 544594351
[考研] 环境285分,过六级,求调剂 +10 xhr12 2026-04-02 10/500 2026-04-04 21:53 by bn53987
[考研] 一志愿武理材料工程302调剂环化或化工 +19 Doleres 2026-03-31 20/1000 2026-04-04 16:44 by 啊俊!
[考研] 考研调剂 +4 zybz冲冲冲 2026-04-03 6/300 2026-04-04 13:08 by zybz冲冲冲
[考研] 一志愿双非085502,267分,过四级求调剂 +3 再忙也要吃饭啊 2026-04-03 3/150 2026-04-04 05:03 by gswylq
[考研] 本科985,专业0812分336求调剂 +4 莫莫很行 2026-04-03 4/200 2026-04-03 21:31 by zhq0425
[考研] 295求调剂 +3 尚偌呀 2026-04-03 4/200 2026-04-03 21:23 by zhq0425
[考研] 303求调剂 +3 一色清羽 2026-04-02 4/200 2026-04-03 10:22 by 蓝云思雨
[考研] 311求调剂 +10 李芷新1 2026-03-31 10/500 2026-04-01 14:38 by chenqifeng666
[考研] 322求调剂 +8 三水sss 2026-04-01 8/400 2026-04-01 10:19 by 唐沐儿
[考研] 340求调剂 +4 希望如此i 2026-03-31 4/200 2026-03-31 16:40 by 690616278
信息提示
请填处理意见