[交流] UDF中如何编写体积分数的梯度已有6人参与

1楼2013-12-13 11:27:51

chenjian5076

木虫 (小有名气)

老和山少侠

应助: 20 (小学生)
金币: 1635.5
红花: 10
帖子: 218
在线: 248.7小时
虫号: 1907370
注册: 2012-07-23
性别: GG
专业: 多相流热物理学

★
小木虫: 金币+0.5, 给个红包，谢谢回帖

C_VOF_G(cell, thread_l)[0]
用这样一个函数就可以，但是开头要调用库函数#include "sg_mphase.h"
具体的可以参见UDF帮助文件

加油！

2楼2013-12-13 17:03:15

iwangchunyu

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 157.5
帖子: 39
在线: 10.7小时
虫号: 1707126
注册: 2012-03-21
专业: 流体力学

引用回帖:

2楼: Originally posted by chenjian5076 at 2013-12-13 17:03:15
C_VOF_G(cell, thread_l)
用这样一个函数就可以，但是开头要调用库函数#include "sg_mphase.h"
具体的可以参见UDF帮助文件

我编了这样一段程序。解释的时候出现：line 15: invalid type for binary expression: float * array 2 of float.的错误。line 15

以下是程序：
#include "udf.h"

#include "sg_mphase.h"
#define T_SAT 319
#define LAT_HT 2.392e6

DEFINE_SOURCE(vap_src, cell, pri_th, dS, eqn)
{
Thread * mix_th, *sec_th;
real m_dot_v,q;
mix_th = THREAD_SUPER_THREAD(pri_th);
sec_th = THREAD_SUB_THREAD(mix_th, 1);
if(C_T(cell, mix_th)<=T_SAT)
{
q=-2*C_K_L(cell,pri_th)*C_T_G(cell,pri_th)*C_VOF(cell,pri_th); /*此行提示错误*/
m_dot_v=q/LAT_HT;
dS[eqn] = -2*C_K_L(cell,pri_th)*C_T_G(cell,pri_th)/LAT_HT;
}
else
{
q=C_VOF_G(cell,sec_th);
m_dot_v=q/LAT_HT;
dS[eqn] = 0;
}
return m_dot_v;
}

DEFINE_SOURCE(liq_src, cell, sec_th, dS, eqn)
{
Thread *mix_th, *pri_th;
  real m_dot_l,  q;
  mix_th = THREAD_SUPER_THREAD(sec_th);
  pri_th = THREAD_SUB_THREAD(mix_th,0);
  if(C_T(cell, mix_th)<=T_SAT)
{
q=2*C_K_L(cell,sec_th)*C_T_G(cell,sec_th)*C_VOF_G(cell,sec_th);
m_dot_l=q/LAT_HT;;
dS[eqn] =2*C_K_L(cell,pri_th)*C_T_G(cell,pri_th)/LAT_HT;
}
else
{
q=-2*C_K_L(cell,pri_th)*C_T_G(cell,pri_th)*C_VOF_G(cell,pri_th);
m_dot_l=q/LAT_HT;
dS[eqn]=0.;
}
return m_dot_l;
}

DEFINE_SOURCE(enrg_src, cell, mix_th, dS, eqn)
{
  Thread *pri_th, *sec_th;
  real m_dot, q;
  pri_th = THREAD_SUB_THREAD(mix_th, 0);
  sec_th = THREAD_SUB_THREAD(mix_th, 1);
  if(C_T(cell, mix_th)<=T_SAT)
{
q=2*C_K_L(cell,pri_th)*C_T_G(cell,pri_th)*C_VOF_G(cell,pri_th);;
dS[eqn] = 0.;
}
else
{
q=-2*C_K_L(cell,sec_th)*C_T_G(cell,sec_th)*C_VOF_G(cell,sec_th);
dS[eqn]=0.;
}
return q;
}

我的udf编的不咋样。你帮我看看。我定义的是气液相变的源项。多谢啦

3楼2013-12-13 18:47:56

chenjian5076

木虫 (小有名气)

老和山少侠

应助: 20 (小学生)
金币: 1635.5
红花: 10
帖子: 218
在线: 248.7小时
虫号: 1907370
注册: 2012-07-23
性别: GG
专业: 多相流热物理学

★
小木虫: 金币+0.5, 给个红包，谢谢回帖

引用回帖:

3楼: Originally posted by iwangchunyu at 2013-12-13 18:47:56
我编了这样一段程序。解释的时候出现：line 15: invalid type for binary expression: float * array 2 of float.的错误。line 15

以下是程序：
#include "udf.h"

#include "sg_mphase.h& ...

这个函数在UDF帮助文件中叫做单元格函数，意思就是通过单元格的数值的差求得梯度，但是开始算的时候其实第一步是没有梯度的，所以这个地方会报错，具体的改进方法你可以看以下链接：http://www.cfd-online.com/Forums ... eulerian-model.html

加油！

4楼2013-12-16 21:20:05

自忆昔静

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 55.5
帖子: 20
在线: 2.6小时
虫号: 2656235
注册: 2013-09-15
性别: MM
专业: 多相流热物理学

★
小木虫: 金币+0.5, 给个红包，谢谢回帖

引用回帖:

这位同学，我跟你遇到一样的问题，想问一下，你解决了吗？急求解决方案呀

赞一下(1人)

5楼2014-06-16 10:27:06

459116191

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 1
帖子: 4
在线: 18.1小时
虫号: 2875631
注册: 2013-12-16

★
小木虫: 金币+0.5, 给个红包，谢谢回帖

引用回帖:

4楼: Originally posted by chenjian5076 at 2013-12-16 21:20:05
这个函数在UDF帮助文件中叫做单元格函数，意思就是通过单元格的数值的差求得梯度，但是开始算的时候其实第一步是没有梯度的，所以这个地方会报错，具体的改进方法你可以看以下链接：http://www.cfd-online.com/For ...

你好，我看了链接，那个UDF能编译也能计算，但是提取出来的体积分数梯度始终都是零啊？烦请兄台指教！非常感激！

6楼2014-12-05 09:19:51