找回密码
 注册
查看: 1895|回复: 7

静电除尘器UDF加载电场力

[复制链接]
发表于 2015-4-13 10:26:46 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

x
请问哪位大侠了解或做过静电除尘器FLUENT模拟中用UDF加载电场,求指教啊,还有就是有没有相应的案例或编的udf程序?
发表于 2015-4-27 19:34:05 | 显示全部楼层
#include "udf.h"
  #include "dpm.h"
  #include q1.5e-15
  DEFINE_DPM_SOURCE(ele_dpm,c,t,source,strength,tp)
  {
  real E;
  real source;
  real q;
  source=-q*E;
  }

发表于 2015-4-27 19:34:37 | 显示全部楼层
不知道对不对,我也是在网上找的。
发表于 2015-4-27 19:43:44 | 显示全部楼层
本例计算带电颗粒的磁场力。带电颗粒从上游进入层流流动的流体内,然后在t=tstart时进入下游的磁场区域,做近似圆周运动(并不完全是圆周运动,因为颗粒所受的磁场力大小是变化的)。
宏P_TIME(p)给出颗粒在流场中运动的时间,p为指针,指向颗粒的轨道。C源程序给出如下。

/***********************************************************************/
/* UDF for computing the ic force on a charged particle */
/***********************************************************************/
#include "udf.h"
#include "dpm.h"
#define Q 1.0  /* particle electric charge */
#define BZ 3.0  /* z component of ic field */
#define TSTART 18.0  /* field applied at t = tstart */
/* Calculate ic force on charged particle. ic */
/* force is particle charge times cross product of particle */
/* velocity with ic field: Fx= q*bz*Vy, Fy= -q*bz*Vx */
DEFINE_DPM_BODY_FORCE(particle_body_force, p, i)
{
float bforce;
if(P_TIME(p)>=TSTART)
{
if(i==0) bforce=Q*BZ*P_VEL(p)[1];
else if(i==1) bforce=-Q*BZ*P_VEL(p)[0];
}
else
bforce=0.0;
/* an acceleration should be returned */
return (bforce/P_MASS(p));

发表于 2015-4-27 19:44:44 | 显示全部楼层
可以参考一下。

 楼主| 发表于 2015-5-14 20:57:38 | 显示全部楼层
suansuande 发表于 2015-4-27 19:43
本例计算带电颗粒的磁场力。带电颗粒从上游进入层流流动的流体内,然后在t=tstart时进入下游的磁场区域, ...

你好,我做的是只加电场的,没有磁场,有没有加电场影响的程序啊?

 楼主| 发表于 2015-5-26 22:02:32 | 显示全部楼层

亲,有没有不带磁场的,只有一个电场,拜托了
发表于 2015-10-4 15:27:12 | 显示全部楼层
请问楼主问题解决了吗?最近也在做这方面的研究,希望可以请教一下楼主,谢谢了!
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表