版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

返回列表

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

enigmafwj

捐助贵宾 (小有名气)

应助: 1 (幼儿园)
金币: 0.4
散金: 21
帖子: 106
在线: 35小时
虫号: 1917147
注册: 2012-07-30
专业: 传热传质学

[求助] 【求助】FLUENT UDF 气液两相流汽蚀汽化潜热(问题详见内容)

为液相、气相质量方程和能量方程添加源项，UDF程序如下，汽化、液化由压力控制（压力条件判断），各物性参数用温度拟合。问题是：编译时，提示有语法错误(parse)，并且fv为未声明的变量。请问如何解决？另：程序中有其他不妥之处，烦请指教，谢谢！
#include "udf.h"
#include "sg_mphase.h"

DEFINE_SOURCE(liq_m,c,l_t,dS,eqn) /*液相质量输运源项*/
{
Thread *m_t,*v_t;                /*计算区域指针*/
  m_t=THREAD_SUPER_THREAD(l_t);    /*混合区液相指针*/
  v_t=THREAD_SUB_THREAD(m_t,1);    /*单相区气相指针*/
real m_dot_l;                      /*液相质量输运量*/
real stc;                         /*液氧表面张力系数*/
real fv;                         /*气相质量分数*/
  fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t));
real pres_vap,pres_sat,pres_turb; /*液氧饱和蒸汽压(考虑湍流影响)*/
  if(C_T(c,m_t)>154.58)
{
   stc=0;
   pres_sat=5.041e6;
}
  else if(C_T(c,m_t)>54.36)
{
   stc=0.038066*pow(1-C_T(c,l_t)/154.58,1.2136);
   pres_sat=133.322*pow(10,20.6695-526.97/C_T(c,l_t)-6.7062*log10(C_T(c,l_t))+0.012926*C_T(c,l_t)-C_T(c,l_t)*C_T(c,l_t)*(9.8832e-13));
}
  else
{
   stc=0.0225;
   pres_sat=146.041;
}
  pres_turb=0.39*C_R(c,l_t)*C_K(c,m_t);
  pres_vap=pres_sat+0.5*pres_turb;
if(C_P(c,m_t)<=pres_vap)          /*液相汽化*/
{
m_dot_l=-0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t)))*(1-fv);
dS[eqn]=-0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t)));
}
else                               /*气相液化*/
{
m_dot_l=0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t)))*fv;
dS[eqn]=0;
}
return m_dot_l;
}

DEFINE_SOURCE(vap_m,c,v_t,dS,eqn) /*气相质量输运源项*/
{
Thread *m_t,*l_t;                /*计算区域指针*/
  m_t=THREAD_SUPER_THREAD(v_t);    /*混合区气相指针*/
  l_t=THREAD_SUB_THREAD(m_t,0);    /*单相区液相指针*/
real m_dot_v;                      /*气相质量输运量*/
real stc;                         /*液氧表面张力系数*/
real fv;                         /*气相质量分数*/
  fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t));
real pres_vap,pres_sat,pres_turb; /*液氧饱和蒸汽压(考虑湍流影响)*/
  if(C_T(c,m_t)>154.58)
{
   stc=0;
   pres_sat=5.041e6;
}
  else if(C_T(c,m_t)>54.36)
{
   stc=0.038066*pow(1-C_T(c,l_t)/154.58,1.2136);
   pres_sat=133.322*pow(10,20.6695-526.97/C_T(c,l_t)-6.7062*log10(C_T(c,l_t))+0.012926*C_T(c,l_t)-C_T(c,l_t)*C_T(c,l_t)*(9.8832e-13));
}
  else
{
   stc=0.0225;
   pres_sat=146.041;
}
  pres_turb=0.39*C_R(c,l_t)*C_K(c,m_t);
  pres_vap=pres_sat+0.5*pres_turb;
if(C_P(c,m_t)<=pres_vap)          /*液相汽化*/
{
m_dot_v=0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t)))*(1-fv);
dS[eqn]=0;
}
else                               /*气相液化*/
{
m_dot_l=-0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t)))*fv;
dS[eqn]=-0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t)));
}
return m_dot_v;
}

DEFINE_SOURCE(m_enrg,c,m_t,dS,eqn) /*混合相能量方程输运源项*/
{
Thread *l_t,*v_t;                /*计算区域指针*/
  l_t=THREAD_SUB_THREAD(m_t,0);    /*混合区液相指针*/
  v_t=THREAD_SUB_THREAD(m_t,1);    /*混合区气相指针*/
real m_dot;                      /*相变质量*/
real hc;                         /*汽化潜热*/
real source;                      /*能量方程源项*/
real stc;                         /*液氧表面张力系数*/
real fv;                         /*气相质量分数*/
  fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t));
real pres_vap,pres_sat,pres_turb; /*液氧饱和蒸汽压(考虑湍流影响)*/
  if(C_T(c,m_t)>154.58)
{
   stc=0;
   pres_sat=5.041e6;
   hc=0;
}
  else if(C_T(c,m_t)>54.36)
{
   stc=0.038066*pow(1-C_T(c,l_t)/154.58,1.2136);
   pres_sat=133.322*pow(10,20.6695-526.97/C_T(c,l_t)-6.7062*log10(C_T(c,l_t))+0.012926*C_T(c,l_t)-C_T(c,l_t)*C_T(c,l_t)*(9.8832e-13));
   hc=8040*pow(1-C_T(c,l_t)/154.58,0.201);
}
  else
{
   stc=0.0225;
   pres_sat=146.041;
   hc=2523;
}
  pres_turb=0.39*C_R(c,l_t)*C_K(c,m_t);
  pres_vap=pres_sat+0.5*pres_turb;
if(C_P(c,m_t)<=pres_vap)          /*液相汽化，温度升高，源项为正*/
{
m_dot=0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t)))*(1-fv);
source=m_dot*hc;
dS[eqn]=0;
}
else                               /*气相液化，温度降低，源项为负*/
{
m_dot=-0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t)))*fv;
source=-m_dot*hc;
dS[eqn]=0;
}
return source;
}

回复此楼

» 猜你喜欢

请问有评职称，把科研教学业绩算分排序的高校吗已经有6人回复
2025冷门绝学什么时候出结果已经有6人回复
Bioresource Technology期刊，第一次返修的时候被退回好几次了已经有7人回复
真诚求助：手里的省社科项目结项要求主持人一篇中文核心，有什么渠道能发核心吗已经有8人回复
寻求一种能扛住强氧化性腐蚀性的容器密封件已经有5人回复
请问哪里可以有青B申请的本子可以借鉴一下。已经有4人回复
请问下大家为什么这个铃木偶联几乎不反应呢已经有5人回复
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入已经有4人回复
康复大学泰山学者周祺惠团队招收博士研究生已经有6人回复
AI论文写作工具：是科研加速器还是学术作弊器？已经有3人回复

1楼2012-07-30 17:51:36

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

enigmafwj

捐助贵宾 (小有名气)

应助: 1 (幼儿园)
金币: 0.4
散金: 21
帖子: 106
在线: 35小时
虫号: 1917147
注册: 2012-07-30
专业: 传热传质学

引用回帖:

11楼: Originally posted by kylafree at 2012-08-03 17:02:46
我不知道啊，正学习呢，自己现在没做多相流，但有兴趣，碰见机会正好学习下

...

朋友，这个UDF在单机多核下最后会出现这样一个问题,能否麻烦你看看，恳请指教。
received suspend command for a pmi context that doesn't exist:unmatched id=2
unable to read the cmd header on the pmi context,Undefined dynamic error code.
The parallel FLUENT process could not be started.
job aborted:
rank:node:exit code[:error message]
0:***:-1073741819:process 0 exited without calling finalize
1:***:-1073741819:process 1 exited without calling finalize
2:***:123

注：1.***是计算机名
2.瞬态计算

赞一下

回复此楼

12楼2012-08-11 10:37:58

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

查看全部 22 个回答

kylafree

至尊木虫 (知名作家)

应助: 166 (高中生)
金币: 16954
散金: 883
红花: 18
帖子: 6119
在线: 1161.6小时
虫号: 1061079
注册: 2010-07-20
性别: GG
专业: 流体力学

【答案】应助回帖

★ ★ ★ ★
感谢参与，应助指数 +1
xiegangmai: 金币+2, 谢谢参与！ 2012-07-30 21:50:07
enigmafwj: 金币+2 2012-12-18 20:11:11

real fv;                         /*气相质量分数*/
fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t));
real pres_vap,pres_sat,pres_turb; /*液氧饱和蒸汽压(考虑湍流影响)*/

改为：
real pres_vap,pres_sat,pres_turb; /*液氧饱和蒸汽压(考虑湍流影响)*/
real fv;                         /*气相质量分数*/
fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t));
定义变量要在赋值语句开始之前全部定义完毕。

另外向兄台请教一下，这两句的thread具体指什么thread，感激不尽啊。
m_t=THREAD_SUPER_THREAD(v_t);    /*混合区气相指针*/
l_t=THREAD_SUB_THREAD(m_t,0);    /*单相区液相指针*/
为啥第一句是“混合区气相指针”，而第二句跑到“单相区液相指针”了呢

赞一下(1人)

回复此楼

2楼2012-07-30 21:19:25

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

enigmafwj

捐助贵宾 (小有名气)

应助: 1 (幼儿园)
金币: 0.4
散金: 21
帖子: 106
在线: 35小时
虫号: 1917147
注册: 2012-07-30
专业: 传热传质学

引用回帖:

2楼: Originally posted by kylafree at 2012-07-30 21:19:25
real fv; /*气相质量分数*/
fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t));
real pres_vap,pres_sat,pres_turb; /*液氧饱和蒸汽压(考虑湍流影 ...

因为你所问的这两句，是在气相质量方程源项里的，DEFINE_SOURCE(vap_m,c,v_t,dS,eqn)里的thread：v_t在该宏应用于气相质量方程时指向了气相区。因为之后要用到混合区气相的参数，所以用THREAD_SUPER_THREAD(v_t)把指针恢复到混合区气相并传给m_t；
THREAD_SUB_THREAD(m_t,0)的意思是在m_t得到混合区气相指针后，m_t作为最高区域(混合区)的指针，可以用这个函数把单相区液相指针传给l_t，才能用l_t调用到液相区的参数，0指的是主相(液相)，1指的是次相(气相)。

赞一下

回复此楼

3楼2012-07-31 15:49:14

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

kylafree

至尊木虫 (知名作家)

应助: 166 (高中生)
金币: 16954
散金: 883
红花: 18
帖子: 6119
在线: 1161.6小时
虫号: 1061079
注册: 2010-07-20
性别: GG
专业: 流体力学

★ ★ ★
xiegangmai: 金币+3, 鼓励讨论交流！ 2012-08-02 23:05:49

引用回帖:

3楼: Originally posted by enigmafwj at 2012-07-31 15:49:14
因为你所问的这两句，是在气相质量方程源项里的，DEFINE_SOURCE(vap_m,c,v_t,dS,eqn)里的thread：v_t在该宏应用于气相质量方程时指向了气相区。因为之后要用到混合区气相的参数，所以用THREAD_SUPER_THREAD(v_t)把 ...

感谢兄台，受教了。我本来没做多相流，但对这个有点兴趣。
再问几个小白的问题可以不。比如我按下面这样理解对头不：
气相区----就是指这个区域的CELL只有气相；
液相区----就是指这个区域的CELL只有液相；
混合区----就是指这个区域的CELL既有气相也有液相；
混全区thread----是说混合区既然有混合thread，又有气相thread，还有液相thead。气相thread液相thread混合thread怎么联系起来啊，糊涂了

赞一下

回复此楼

4楼2012-07-31 16:22:41

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

查看全部 22 个回答

24小时热门版块排行榜

enigmafwj

[求助] 【求助】FLUENT UDF 气液两相流 汽蚀 汽化潜热(问题详见内容)

» 猜你喜欢

enigmafwj

kylafree

【答案】应助回帖

enigmafwj

kylafree

[求助] 【求助】FLUENT UDF 气液两相流汽蚀汽化潜热(问题详见内容)