24小时热门版块排行榜    

查看: 735  |  回复: 0

xuxia8495

银虫 (小有名气)

[求助] 能量源项编程问题

所编写的能量源项程序如下:
#include "udf.h"
DEFINE_SOURCE(heat_flux,cell,thread,ds,eqn)
{
real x[ND_ND];
real time,r;
real source_heat;
int k,u;
C_CENTROID(x,cell,thread);
time=CURRENT_TIME;
k=(int)((int)(time)/6);
u=(int)(time)%6;
r=0;
if(u>=0&&u<2)
{
        r=sqrt(pow(x[0]+0.2-0.2*(time-6*k),2)+pow(x[1]-0.2,2));
       
        if(r<=0.06&&x[2]>=0&&x[2]<=0.001&&x[1]<=0.2)
                {
                source_heat=8e11*exp(-3000*pow((r-0.005),2));
                ds[eqn] =0;
                }               
        else if(r<=0.06&&x[2]>=0&&x[2]<=0.001&&x[1]>0.2)
                {
                source_heat=4e11*exp(-3000*pow((r-0.005),2));
                ds[eqn] =0;
                }
}
else
{
source_heat= ds[eqn] =0;
}
Message("u=%d,k=%d\n",u,k);
Message("source_heat=%f\n",source_heat);
return source_heat;
}
存在问题:所有输出的能量值source_heat都为0

模型简介:t=0时刻,在xy平面上,热源中心位于(-0.2,0.2);随时间增加,在0-2S内热源沿y=0.2直线运动;热源扫描区域为半径为r=0.06的圆形。在当前时刻,热源中心为(-0.2+0.2*(time-6*k), 0.2),所以有热源的圆形半径r=sqrt(pow(x[0]+0.2-0.2*(time-6*k),2)+pow(x[1]-0.2,2))
以下方式查看r值:
r=sqrt(pow(x[0]+0.2-0.2*(time-6*k),2)+pow(x[1]-0.2,2));
Message("r=%f\n",r);
发现输出的r值没有小于0.1的,不知道是刷屏太快还是确实没有?
如果确实无小于0.1的值,热源输出值为0,也就正常;可问题是r应该有小于0.06的值,因为x[0],x[1]的取值范围为[-0.35,0.35],也就是说r的输出值应该在[0,0.06]内有值!!


仔细检查了下,实在找不出哪出现问题了
高手们帮忙看看吧,谢谢!!!
回复此楼
fluent交流群:247890687
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

智能机器人

Robot (super robot)

我们都爱小木虫

相关版块跳转 我要订阅楼主 xuxia8495 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 奇怪,两个人的filecode固定段从头到尾一模一样 +7 布布和一二 2026-08-10 9/450 2026-08-11 22:12 by 医学老男孩
[基金申请] 是这周出结果还是下周出结果? +3 yuleib84 2026-08-11 3/150 2026-08-11 21:53 by jnhyjjm
[博后之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 yPv6ndDtiRxQ 2026-08-11 4/200 2026-08-11 21:03 by thgx1vqMqrLw
[教师之家] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 yPv6ndDtiRxQ 2026-08-11 3/150 2026-08-11 20:51 by thgx1vqMqrLw
[考研] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 yPv6ndDtiRxQ 2026-08-11 3/150 2026-08-11 20:51 by thgx1vqMqrLw
[博后之家] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 yPv6ndDtiRxQ 2026-08-10 7/350 2026-08-11 20:39 by thgx1vqMqrLw
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 GpvwGNVshCOp 2026-08-10 7/350 2026-08-11 19:39 by thgx1vqMqrLw
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 分享一下我之前已中青C的计划书的filecode +3 布布和一二 2026-08-11 4/200 2026-08-11 15:20 by aasahr
[基金申请] 听说今天filecode变了 +26 布布和一二 2026-08-06 49/2450 2026-08-11 13:18 by WH3796
[基金申请] filecode +9 documentary 2026-08-10 9/450 2026-08-11 10:08 by wk7465
[基金申请] 关于代码变化问题,想知道的进来 +17 且听虎啸 2026-08-07 24/1200 2026-08-10 18:35 by zhangduo2008
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
[基金申请] 2026国自然放榜时间 +9 布布和一二 2026-08-08 9/450 2026-08-10 11:22 by xxxx2020
[基金申请] 这样的filecode谁见过 +11 布布和一二 2026-08-08 22/1100 2026-08-10 11:10 by wmfsnow
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
[基金申请] 关于filecode,很负责任的告诉大家 +6 爱看书的可乐 2026-08-08 7/350 2026-08-08 22:13 by a_niu
[基金申请] 关于filecode +4 布布和一二 2026-08-07 7/350 2026-08-07 22:55 by zhanghaozhu
[基金申请] filecode变化情况 +6 布布和一二 2026-08-07 22/1100 2026-08-07 14:45 by 且听虎啸
[基金申请] 好消息?这个有何含义??? +8 Tide man 2026-08-05 10/500 2026-08-05 16:14 by xmuxiaoyu
信息提示
请填处理意见