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

24小时热门版块排行榜    

CyRhmU.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » FLUENT & CFX » 曳力函数的的UDF
51/1返回列表
查看: 3931  |  回复: 15
只看楼主@他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

zhangxu86

铜虫 (小有名气)

[求助] 曳力函数的的UDF已有2人参与

请问各位大侠，我的模型使用的是欧拉模型，物质是沙和水，请问一下，编写沙水两者之间的曳力时，是使用液液交换系数还是使用液体-固体交换系数呢？下面的是我看到一篇流化床立体上的程序，不知道为什么计算两次K和f呢？上面一段程序使用的就是Syamlal-O‘Brien，下面一段就不明白了。。。。。
/* This is a routine for customizing default Syamlal drag law in Fluent 6.
   The default drag law uses 0.8 (for void<=0.85) and 2.65 (void>0.85) for
   bfac. This is for a min fluid vel of 25 cm/s. The current drag law has been
   tuned for a min fluid vel of 8 cm/s and uses 0.28 and 9.07 for these
   parameters. */

#include "udf.h"
#include "sg_mphase.h"

# define pi 4.*atan(1.)
#define diam2 3.e-4

DEFINE_EXCHANGE_PROPERTY(custom_drag_syam, cell, mix_thread, s_col, f_col)
{
Thread *thread_g, *thread_s;
real x_vel_g, x_vel_s, y_vel_g, y_vel_s, abs_v, slip_x, slip_y,
      rho_g, rho_s, mu_g, reyp, afac,
      bfac, void_g, vfac, fdrgs, taup, k_g_s;

/* find the threads for the gas (primary) and solids (secondary phases).
These phases appear in columns 2 and 1 in the Interphase panel respectively*/

thread_g = THREAD_SUB_THREAD(mix_thread, s_col);/*gas phase*/
thread_s = THREAD_SUB_THREAD(mix_thread, f_col);/* solid phase*/

/* find phase velocities and properties*/

x_vel_g = C_U(cell, thread_g);
y_vel_g = C_V(cell, thread_g);

x_vel_s = C_U(cell, thread_s);
y_vel_s = C_V(cell, thread_s);

slip_x = x_vel_g - x_vel_s;
slip_y = y_vel_g - y_vel_s;

rho_g = C_R(cell, thread_g);
rho_s = C_R(cell, thread_s);

mu_g = C_MU_L(cell, thread_g);

/*compute slip*/
abs_v = sqrt(slip_x*slip_x + slip_y*slip_y);

/*compute reynolds number*/

reyp = rho_g*abs_v*diam2/mu_g;

/* compute particle relaxation time */

taup = rho_s*diam2*diam2/18./mu_g;

void_g = C_VOF(cell, thread_g);/* gas vol frac*/

/*compute drag and return drag coeff, k_g_s*/

afac = pow(void_g,4.14);

if(void_g<=0.85)
  bfac = 0.281632*pow(void_g, 1.28);
else
  bfac = pow(void_g, 9.076960);

vfac = 0.5*(afac-0.06*reyp+sqrt(0.0036*reyp*reyp+0.12*reyp*(2.*bfac-
              afac)+afac*afac));
fdrgs = void_g*(pow((0.63*sqrt(reyp)/vfac+4.8*sqrt(vfac)/vfac),2))/24.0;

k_g_s = (1.-void_g)*rho_s*fdrgs/taup;

return k_g_s;

}

DEFINE_EXCHANGE_PROPERTY(custom_drag_ihme, cell, mix_thread, s_col, f_col)

{

Thread *thread_g, *thread_s;
real x_vel_g, x_vel_s, y_vel_g, y_vel_s, abs_v, slip_x, slip_y,
      rho_g, rho_s, mu_g, reyp, cd, eg,
      void_g, k_g_s;

/* find the threads for the gas (primary) and solids (secondary phases).
These phases appear in columns 2 and 1 in the Interphase panel respectively*/

thread_g = THREAD_SUB_THREAD(mix_thread, s_col);/*gas phase*/
thread_s = THREAD_SUB_THREAD(mix_thread, f_col);/* solid phase*/

/* find phase velocities and properties*/

x_vel_g = C_U(cell, thread_g);
y_vel_g = C_V(cell, thread_g);

x_vel_s = C_U(cell, thread_s);
y_vel_s = C_V(cell, thread_s);

slip_x = x_vel_g - x_vel_s;
slip_y = y_vel_g - y_vel_s;

rho_g = C_R(cell, thread_g);
rho_s = C_R(cell, thread_s);

mu_g = C_MU_L(cell, thread_g);

/*compute slip*/
abs_v = sqrt(slip_x*slip_x + slip_y*slip_y);

/*compute reynolds number*/

reyp = rho_g*abs_v*diam2/mu_g;

cd = (24./(reyp+SMALL)) + 5.48*pow((reyp+SMALL),-0.573) + 0.36;

void_g = C_VOF(cell, thread_g);/* gas vol frac*/

eg = pow(void_g,-2.65);

k_g_s = (3./4.)*(cd*(1.-void_g)*abs_v*rho_g*eg)/diam2;

return k_g_s;

}
回复此楼

» 收录本帖的淘帖专辑推荐

我的收藏

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼2011-10-25 21:29:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

47425804

木虫 (正式写手)

【答案】应助回帖

★ ★
臭水沟(金币+2): 谢谢应助~~ 2011-10-27 16:10:41
引用回帖:
5楼: Originally posted by zhangxu86 at 2011-10-26 19:30:10:
不是一个曳力就可以了吗，一个模型怎么可以选择两个曳力模型呢？这个一个流化床的案例，我觉得只要一个就可以了啊

那要看具体的cas里是怎么用的了
说不定有好几种颗粒，分别用了各自的曳力模型；
也说不定就是写了两个放在里面，图方便而已。
赞一下(1人) 回复此楼
6楼2011-10-26 22:06:31
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 16 个回答

47425804

木虫 (正式写手)
★
臭水沟(金币+1): 谢谢交流~~ 2011-10-26 10:07:31
计算两次K和f？
不明白什么意思。
哪儿计算两次K和f了？
赞一下(1人) 回复此楼
2楼2011-10-25 22:52:01
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangxu86

铜虫 (小有名气)
引用回帖:
2楼: Originally posted by 47425804 at 2011-10-25 22:52:01:
计算两次K和f？
不明白什么意思。
哪儿计算两次K和f了？

k_g_s = (1.-void_g)*rho_s*fdrgs/taup;

k_g_s = (3./4.)*(cd*(1.-void_g)*abs_v*rho_g*eg)/diam2;
是两次计算交换系数K值，不知道下面的K值是干什么用的呢？
赞一下 回复此楼
3楼2011-10-26 09:12:50
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

47425804

木虫 (正式写手)

【答案】应助回帖

★
臭水沟(金币+1): 谢谢交流~~ 2011-10-27 16:10:28
引用回帖:
3楼: Originally posted by zhangxu86 at 2011-10-26 09:12:50:
k_g_s = (1.-void_g)*rho_s*fdrgs/taup;

k_g_s = (3./4.)*(cd*(1.-void_g)*abs_v*rho_g*eg)/diam2;
是两次计算交换系数K值，不知道下面的K值是干什么用的呢？

没有计算两遍，这是两个函数，也就是两个曳力模型，互相没有关系的。
赞一下(1人) 回复此楼
4楼2011-10-26 10:13:08
 已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 16 个回答
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭