24小时热门版块排行榜    

查看: 3499  |  回复: 15
【悬赏金币】回答本帖问题,作者zhangxu86将赠送您 5 个金币
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

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;

}
回复此楼

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

我的收藏

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

yangshuaibyx

金虫 (小有名气)

引用回帖:
6楼: Originally posted by 47425804 at 2011-10-26 22:06:31
那要看具体的cas里是怎么用的了
说不定有好几种颗粒,分别用了各自的曳力模型;
也说不定就是写了两个放在里面,图方便而已。...

就是气固两相,能用两个曳力模型吗?是不是只能用一个,上面程序中有两个但是可能有一个用不到。
7楼2014-06-21 21:45:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zhangxu86 的主题更新
不应助 确定回帖应助 (注意:应助才可能被奖励,但不允许灌水,必须填写15个字符以上)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] Journal of Power Sources只有一个审稿人接受 10+3 养个月亮! 2024-07-03 4/200 2024-07-04 10:15 by bobvan
[教师之家] 普通老师、教研室主任、院长副院长都要做很多杂事,学科带头人、专业负责人最舒适 +10 河西夜郎 2024-07-03 12/600 2024-07-04 10:15 by 剑客
[教师之家] 2个国家级项目或1个国家级重大重点项目,可直聘为教授 +8 河西夜郎 2024-07-03 13/650 2024-07-04 06:51 by aasahr
[论文投稿] 审稿后要求修改稿件 需要写修改说明 +3 赵杉嫚 2024-07-03 3/150 2024-07-03 21:18 by 随心就好啊
[基金申请] 国自然地区项目不知道今年能卷成什么样 +7 wuzhiming03 2024-07-01 22/1100 2024-07-03 19:37 by 进击的荣耀
[基金申请] 2024年地学口面地青会评啥时候啊 +5 yueliang198 2024-06-30 6/300 2024-07-03 18:53 by fzy721521
[有机交流] 高分辨测试 +3 lee_weiyu 2024-06-29 3/150 2024-07-03 16:03 by kui_539
[论文投稿] 论文投稿后被同一个审稿人拒两次,编辑让再修改一次 +3 fencun 2024-07-02 3/150 2024-07-03 16:01 by zgtzgt
[基金申请] 科研之友最近访客那出现来自北京的未知用户,什么情况? +31 lihangshi 2024-06-28 73/3650 2024-07-03 15:04 by 自若远山HH
[硕博家园] 开题 +4 东北。 2024-06-29 7/350 2024-07-03 13:46 by 东北。
[基金申请] 祈福基金高中 +5 sjunliu 2024-07-02 5/250 2024-07-03 09:09 by 一路向东
[硕博家园] 前导太严,换导后更失望,我想读博的理想实现不了了,特难过 +13 欢乐颂叶蓁 2024-07-02 13/650 2024-07-03 08:40 by 20.24
[访问学者] 澳大利亚科廷大学招收化学、化工、材料背景访问学者和访问学生 +4 cfwghj 2024-06-27 6/300 2024-07-02 18:48 by shl2112501
[基金申请] 请教大佬,博后面上申请透漏个人信息 +5 Tansund 2024-07-01 7/350 2024-07-02 17:20 by kangshisan
[基金申请] 2020面地青已有会评专家接到电话了 +11 dream200606 2024-06-28 13/650 2024-07-01 21:20 by liliwang215
[论文投稿] proof后发现基金英文名拼错了 10+4 okoopu 2024-06-28 10/500 2024-07-01 20:39 by 17612199562
[基金申请] 中了博后面上系统能查到分数和排名吗? +5 老黑不黑 2024-06-29 6/300 2024-07-01 06:19 by yqliu130
[论文投稿] Scitific Reports +5 智晨君 2024-06-27 5/250 2024-06-29 10:37 by zhulei513
[基金申请] 有当年结题的在研国基对申请影响大不大 1+4 sunjc 2024-06-28 13/650 2024-06-28 17:09 by lijian7338
[基金申请] 75批面上出结果了么?系统卡的进不去了 +4 wziguang33 2024-06-27 4/200 2024-06-27 15:53 by xter9665
信息提示
请填处理意见