24小时热门版块排行榜    

查看: 1333  |  回复: 2

王周鹏

新虫 (小有名气)

[求助] 请高手帮我看看我的关于体积力UDF中的错误

#include "udf.h"  

     
#define TSTART 0.0        
#define d  0.00085
#define pi  3.14
#define a   3e-7
#define m0   20
#define R   0.0005
#define c  0.1
#define u  1.256e-6

DEFINE_DPM_BODY_FORCE(particle_body_force, p, i)
{
        real VCP,cc,m,z0,r,x,y,z,bforce;

        if(P_TIME(p)>=TSTART)
          {
           x=P_POS(p)[0];/颗粒在X轴上的坐标
           y=P_POS(p)[1];/颗粒在Y轴上的坐标
           z=P_POS(p)[2];/颗粒在Z轴上的坐标

           VCP=4.0*pi*a*a*a/3.0;/颗粒的体积
           cc=c/(3+c);
           m=pow(m0,2);
           z0=z+R+d;
           r=sqrt(x*x+y*y+z0*z0);
           if(i==0) bforce=-9.0*u*cc*VCP*m*x*(4*z0*z0+r*r)/(16*pi*pi*(pow(r,10)));/X方向的体积力

            else if(i==1) bforce=-9.0*u*cc*VCP*m*y*(4*z0*z0+r*r)/(16*pi*pi*(pow(r,10)));/Y方向的体积力

      
          else if(i==2) bforce=-9.0*u*cc*VCP*m*(4*z0*z0*z0)/(16*pi*pi*(pow(r,10)));/Z方向的体积力

          }
        else
           bforce=0.0;
        /* an acceleration should be returned */
        return (bforce/P_MASS(p));  
}

[ Last edited by 王周鹏 on 2014-1-6 at 21:17 ]
回复此楼

» 猜你喜欢

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

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

achilFes1990

木虫 (著名写手)

【答案】应助回帖

★
感谢参与,应助指数 +1
1592203609: 金币+1, 谢谢回帖! 2014-01-10 19:22:52
至少给出你遇到问题的详细表述吧,你想解决的是什么问题,你现在执行的过程中遇到了什么问题,你就摆个程序上来,怎么帮你?
扫一扫关注我的微信公众号,共同学习船舶CFD
2楼2014-01-07 08:08:18
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

王周鹏

新虫 (小有名气)

引用回帖:
2楼: Originally posted by achilFes1990 at 2014-01-07 08:08:18
至少给出你遇到问题的详细表述吧,你想解决的是什么问题,你现在执行的过程中遇到了什么问题,你就摆个程序上来,怎么帮你?

我写的是离散相里面颗粒的体积力,可是加里面好像都没反应,是不是我获取颗粒位置坐标的这个方法是不正确的
3楼2014-01-07 10:07:27
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 王周鹏 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 XJXMuRjD7cK7 2026-11-13 3/150 2026-11-14 13:02 by KXypaGgBBlw7
[硕博家园] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 XJXMuRjD7cK7 2026-11-13 3/150 2026-11-14 12:51 by KXypaGgBBlw7
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 1Nb0IVlmV6v0 2026-11-11 4/200 2026-11-13 11:18 by Equinoxhua
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +6 FChKX8meu1ds 2026-11-09 10/500 2026-11-13 11:08 by Equinoxhua
[教师之家] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +6 C6CRn66RYYXS 2026-11-10 6/300 2026-11-13 04:21 by Equinoxhua
[考博] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 cdqGD6ftHmbl 2026-11-11 5/250 2026-11-12 12:28 by ECLTXnJnRSXf
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 cdqGD6ftHmbl 2026-11-11 4/200 2026-11-12 12:26 by ECLTXnJnRSXf
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 Z7qfCsdIiD1T 2026-11-10 8/400 2026-11-12 11:20 by HajghKOMynmz
[教师之家] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 czAiolzR0IJC 2026-11-10 7/350 2026-11-12 11:00 by HajghKOMynmz
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 czAiolzR0IJC 2026-11-10 8/400 2026-11-12 11:00 by HajghKOMynmz
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 G2rhSvqvhNzl 2026-11-10 5/250 2026-11-12 10:38 by HajghKOMynmz
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 C6CRn66RYYXS 2026-11-10 6/300 2026-11-12 10:27 by HajghKOMynmz
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 C6CRn66RYYXS 2026-11-10 8/400 2026-11-12 10:27 by HajghKOMynmz
[教师之家] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 C6CRn66RYYXS 2026-11-10 8/400 2026-11-12 10:16 by HajghKOMynmz
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +7 0TEMgxdT1eIw 2026-11-09 9/450 2026-11-12 09:24 by HajghKOMynmz
[教师之家] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 TgvkbZZl9tqB 2026-11-11 3/150 2026-11-12 08:26 by HajghKOMynmz
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 czAiolzR0IJC 2026-11-10 5/250 2026-11-12 06:25 by 9fOTqj074tIg
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 FChKX8meu1ds 2026-11-09 7/350 2026-11-12 05:19 by 9fOTqj074tIg
[公派出国] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 zSbvVX9JFl9J 2026-11-09 8/400 2026-11-12 04:57 by 9fOTqj074tIg
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +6 zSbvVX9JFl9J 2026-11-09 9/450 2026-11-12 04:57 by 9fOTqj074tIg
信息提示
请填处理意见