24小时热门版块排行榜    

查看: 1020  |  回复: 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 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 今天系统多次维护,明天很可能放榜! +5 zju2000 2026-08-16 5/250 2026-08-16 23:23 by Haru815
[论文投稿] 岩土工程学报什么时候才能终审完呐 25+3 yeager111 2026-08-10 4/200 2026-08-16 20:42 by tfang
[基金申请] 2027广东省杰青 +3 奶牛小黑 2026-08-15 6/300 2026-08-16 20:07 by 奶牛小黑
[基金申请] 咱们一起用铁证分析2026国家社科基金中标与否 +7 启萌科技 2026-08-12 26/1300 2026-08-16 12:35 by 启萌科技
[基金申请] 有时候,自然基金真的不能太认真 (我的申报经验) +10 majunge000 2026-08-11 12/600 2026-08-16 08:18 by xli1984
[精细化工] 招聘 金属平磨液,抛光液研发工程师 +3 小天0311 2026-08-14 3/150 2026-08-16 07:31 by H9PLUS
[基金申请] filecode=后面第一个是大写字母 +6 wangze12014 2026-08-14 7/350 2026-08-15 20:12 by gltch
[基金申请] 小木虫上这么多卖论文的,真有人买论文么?感觉没必要啊 +12 Tide man 2026-08-10 13/650 2026-08-15 16:34 by 氺木
[基金申请] 各位道友,我要去昆明玩几天,回来见。 +7 Tide man 2026-08-14 8/400 2026-08-15 01:11 by arzu_hma
[基金申请] filecode +15 documentary 2026-08-10 17/850 2026-08-14 10:08 by kissu88
[基金申请] FileCode能看出啥? +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[基金申请] 静等基金结果 +8 gjjjzhong 2026-08-10 21/1050 2026-08-13 17:56 by 且听虎啸
[基金申请] 重要来源:本周末出结果 +10 瞬息宇宙 2026-08-12 10/500 2026-08-13 15:46 by likettle
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] Filecode 又变了,巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 分享一下我之前已中青C的计划书的filecode +4 布布和一二 2026-08-11 5/250 2026-08-13 12:56 by cratir
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 确定了,国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
信息提示
请填处理意见