24小时热门版块排行榜    

查看: 1390  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

bianboshen

新虫 (初入文坛)

[求助] UDF近壁面cell源项编写 已有1人参与

各位大神,目前我想向所有贴近壁面第一层cell中添加能量源项,代码如下,但是加载后运行结果与不加载是一样的,大神能不能看看问题出现在了哪里?
DEFINE_SOURCE(liq_enrg_src, c, sec_th, dS, eqn)
{

  Thread *mix_th, *pri_th, *t;
  Domain *domain=Get_Domain(1);
  int zone_ID=18;/*wall ID*/
  real m_dot_d=0;
  real kd;
  real Cnt;
  real a;
  real Area[ND_ND];
  real b;
  real d;
  real vg;
  real Reg;
  real tr;
  real Enrg_Source=0;
  face_t f;
  mix_th = THREAD_SUPER_THREAD(sec_th);
  pri_th = THREAD_SUB_THREAD(mix_th,0);
  t=Lookup_Thread(domain,zone_ID);
  begin_f_loop(f, t)
{
if(c == F_C0(f,t))
        {
  Cnt=(1.0-C_VOF(c,pri_th))*C_R(c,sec_th);
  a=Cnt/C_R(c,pri_th);
  if(a<0.3)
  {
          kd=0.18*sqrt(0.026/(C_R(c,pri_th)*0.008));
  }
  else
  {
          kd=pow(a,-0.85)*sqrt(0.026/(C_R(c,pri_th)*0.008));
  }
  m_dot_d=kd*Cnt;
  vg=sqrt(pow(C_U(c,pri_th),2)+pow(C_V(c,pri_th),2)+pow(C_W(c,pri_th),2));

  Reg=C_R(c,pri_th)*vg*0.008/C_MU_L(c,pri_th);

  d=0.00796*0.026/C_R(c,pri_th)/pow(C_VOF(c,pri_th)*vg,2)*pow(Reg,2/3)*pow(C_R(c,pri_th)/C_R(c,sec_th),-1/3)*pow(C_MU_L(c,pri_th)/C_MU_L(c,sec_th),2/3);

  tr=3.14*sqrt(C_R(c,sec_th)*d*d*d/16/0.026);

b=pow(18*pow(C_K_L(c,pri_th)*tr,3)*C_R(c,pri_th)*LAT_HT*pow(m_dot_d,5)/pow(C_R(c,sec_th),4)/C_MU_EFF(c,pri_th)/(1.0-C_VOF(c,pri_th))/(F_T(f,t)-T_SAT),0.25);
F_AREA(Area,f,t);
Enrg_Source=(F_T(f,t)-T_SAT)*b/C_VOLUME(c,mix_th)/(1-C_VOF(c, pri_th))*NV_MAG(Area)*1000000;
dS[eqn]=0;
//Enrg_Source=2;
Message("The value of Enrg_Source is: %f\n", Enrg_Source);
}
else
{
        Enrg_Source=0;
        dS[eqn]=0;
}
   return Enrg_Source;
        }
end_f_loop(f, t)
  }
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xingfuww

专家顾问 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
想向所有贴近壁面第一层cell中添加能量源项  你的第一层网格 判断方法对不对
3楼2017-01-18 13:28:56
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

gyctju

金虫 (著名写手)

写代码,加注释是一个很好的工作习惯
2楼2017-01-17 22:02:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bianboshen

新虫 (初入文坛)

引用回帖:
3楼: Originally posted by xingfuww at 2017-01-18 13:28:56
想向所有贴近壁面第一层cell中添加能量源项  你的第一层网格 判断方法对不对

我的这种方法应该是不对

发自小木虫Android客户端
4楼2017-01-18 15:55:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 2019年青年基金涵评意见,大家看看几个A,几个B? +10 Tide man 2026-08-11 10/500 2026-08-12 20:59 by 陈晨晨陈啊
[基金申请] 不应该看fileCode +5 且听虎啸 2026-08-12 6/300 2026-08-12 16:26 by Tide man
[基金申请] 长年满屏的广告,版主太不责任了。基金也等的急 +4 gltch 2026-08-12 4/200 2026-08-12 16:08 by eulota
[基金申请] filecode +13 documentary 2026-08-10 15/750 2026-08-12 15:56 by 云上清扬
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +7 布布和一二 2026-08-10 10/500 2026-08-12 09:12 by 布布和一二
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分? +11 yufeiwaner 2026-08-09 13/650 2026-08-12 08:17 by yufeiwaner
[基金申请] 是这周出结果还是下周出结果? +3 yuleib84 2026-08-11 3/150 2026-08-11 21:53 by jnhyjjm
[基金申请] 分享一下我之前已中青C的计划书的filecode +3 布布和一二 2026-08-11 4/200 2026-08-11 15:20 by aasahr
[基金申请] 听说今天filecode变了 +26 布布和一二 2026-08-06 49/2450 2026-08-11 13:18 by WH3796
[基金申请] 我的国基提前知道中了,可是同事的操作让我实在接受不了,怎么会有这样的人 +8 家与远方 2026-08-10 13/650 2026-08-11 09:49 by 家与远方
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
[基金申请] 2026国自然放榜时间 +9 布布和一二 2026-08-08 9/450 2026-08-10 11:22 by xxxx2020
[基金申请] 这样的filecode谁见过 +11 布布和一二 2026-08-08 22/1100 2026-08-10 11:10 by wmfsnow
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
[基金申请] fileCode有新解读? +10 Tide man 2026-08-08 18/900 2026-08-09 12:55 by 仁砚薪传
[基金申请] 关于filecode,很负责任的告诉大家 +6 爱看书的可乐 2026-08-08 7/350 2026-08-08 22:13 by a_niu
[基金申请] 关于豆爷回答的JTJC与%2F数量 +5 yang182083 2026-08-06 7/350 2026-08-08 18:29 by zhanghaozhu
[基金申请] 化学口download_prp&amp;fileCode的固定段好像这几天一直没变,有变的大神么? +3 Tide man 2026-08-07 4/200 2026-08-07 22:39 by Tide man
[基金申请] 大家散了吧,后缀研究没有意义,别浪费时间了,过好目前的每一天,不要焦虑 +5 Tide man 2026-08-06 7/350 2026-08-07 13:11 by 医学老男孩
[基金申请] filecode +14 等待解的谜 2026-08-06 19/950 2026-08-07 12:20 by wlwhappy
信息提示
请填处理意见