24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 10149  |  回复: 19

b07988

金虫 (正式写手)

星期六可以休息

[求助] fluent中的体热源加载问题(实际上是热流密度,不是热生成率)

做焊接激光模拟,采用高斯旋转体热源。随时间移动。融化凝固模型。
查询很多资料和问了若干人后,他们的建议都是加载在能量源项。
/*采用旋转高斯体热源*/
/*能量源项*/
#include "udf.h"
DEFINE_SOURCE(heat_flux, cell, thread, dS, eqn)         
{
real x[ND_ND];
real y,I,U,oq,t0,v0,Q,time,cs,HH;
real r,rh;
real source_heat;
cell_t c;
C_CENTROID(x,c,thread);
y=0.7;                        /*有效功率因子*/
U=16.;
I=100.;
v0=2.e-3;                /*焊接速度*/
Q=y*I*U;                /*有效功率*/
cs=3./pow(oq,2.);        /*形状因子*/
HH=1.e-3;                /*热源高度*/
oq=2.5e-3;                /*热源半径*/
time= RP_Get_Real("flow-time";
r=sqrt(pow(x[0]-v0*time,2.)+pow(x[1],2.));        /*坐标与热源中心的距离*/
rh=sqrt(log(HH/x[2])/3.)*oq;/*一定热源高度对应的半径rh*/
if (x[2]==0&&r<=oq)
{
        source_heat=3.*cs*Q/(3.14*HH*(1.-1./exp(3)))*exp(-3.*pow(r,2.)/pow(oq,2.));
        dS[eqn] =0;
}
else if (x[2]==HH&&r==0.)
{
        source_heat=3.*cs*Q/(3.14*HH*(1.-1./exp(3)));
        dS[eqn] =0;
}
else if (x[2]>HH)
{       
        source_heat=0;
        dS[eqn] =0;
}
else if (r<=rh)
{
        source_heat=3.*cs*Q/(3.14*HH*(1.-1./exp(3)))*exp(-3.*cs/log10(HH/x[2])*pow(r,2.));
        dS[eqn] =0;
}
else
{
        source_heat= dS[eqn] =0;
}
return source_heat;
}

条件语句比较复杂,主要怕出问题。呵呵
interpret后没有错误,但加载出不了结果。
希望大家给点意见。

[ 来自科研家族 流体数值模拟 ]

[ Last edited by b07988 on 2012-3-4 at 22:31 ]
回复此楼

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

电弧

» 猜你喜欢

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

先做最重要的事情,再做次重要的事情
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

gyctju

金虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与,应助指数 +1
b07988(金币+3): 有帮助 给出了若干建议,谢谢 2012-03-05 12:30:54
xiegangmai(金币+2): 鼓励讨论交流! 2012-03-05 20:26:19
1, 我记得传热学一个默认的假设是热扰动传递速率无限大,但对与激光加热等加热时间极短的问题,该假设不在适用,这样常见的传热学中微分方程就要做相应的调整,不知道你的激光焊接问题村不存在这个问题?
2 条件语句中有几个将y坐标和某一值做等值比较,首先C_CENTROID取的是网格中心的坐标值,是一系列离散的值,你等确定你的网格正好有一一个或几个网格的y坐标值是这个值(个人觉得,除非你自己输入坐标生成网格,利用网格生成软件生成的网格是不能保证的)?也就是说你那个几个有等号的条件判断语句有很大的可能是遍历完整个网格也找不到符合条件的,这应该是加载不出结果的原因。所以需要修改判断条件。
3,对于1,请教一下高斯热源定义。
2楼2012-03-04 22:58:13
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

b07988

金虫 (正式写手)

星期六可以休息

★ ★
xiegangmai(金币+2): 鼓励讨论交流! 2012-03-05 20:26:43
引用回帖:
2楼: Originally posted by gyctju at 2012-03-04 22:58:13:
1, 我记得传热学一个默认的假设是热扰动传递速率无限大,但对与激光加热等加热时间极短的问题,该假设不在适用,这样常见的传热学中微分方程就要做相应的调整,不知道你的激光焊接问题村不存在这个问题?
2 条件 ...

1.你所说的加热时间极短,v0=2.e-3; /*焊接速度*/,也就是热源移动的速度,我觉得应该不会有影响。我所写的代码中没有微分方程。除了dS[eqn] =0;
2.这个问题确实没仔细考虑,但仔细想想这样写的等式其实没什么问题。热源是一个倒锥形。所涉及的条件是刚好在那个锥尖处。网格比较密,产生的误差可以忽略。就算关键的地方没有满足坐标要求,但仍旧有部分热源存在的。但实际加载没有效果。
3.如图,因为表达式存在1/log(H/z),其中z不能等于0,H不能等于z,所以条件语句比较复杂。呵呵
残差图就是直线,基本没有波动,说明热源没有加载上。

热源模型表达式



中心那根线的热流密度(处处相等)



整体形状

先做最重要的事情,再做次重要的事情
3楼2012-03-05 12:48:52
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

b07988

金虫 (正式写手)

星期六可以休息

仔细看了下q(0,0),单位是w/m3,是一种随坐标和时间变化的体热成率。
先做最重要的事情,再做次重要的事情
6楼2012-03-05 18:09:05
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

gyctju

金虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★
b07988(金币+4): ★★★很有帮助 谢谢你的建议,用message做判断是个好方法 2012-03-05 16:09:04
xiegangmai(金币+2): 谢谢参与! 2012-03-05 20:27:08
我没注意到你还有r<=rh这一句。
至于那几个等式比较的语句,并不是你所说的网格较密,误差可忽略。fluent数据是real类型的,小数点位数应该在六位以上,因为是等值比较,只需要最后以为小数不等,条件就不成立。
你可以在你设的有热源的条件语句部分加一个Message语句,把该点的坐标值输出到控制窗口里,根据这个判断,而非根据残差曲线。
4楼2012-03-05 15:30:36
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

b07988

金虫 (正式写手)

星期六可以休息

★ ★
xiegangmai(金币+2): 鼓励讨论交流! 2012-03-05 20:27:27
引用回帖:
4楼: Originally posted by gyctju at 2012-03-05 15:30:36:
我没注意到你还有r<=rh这一句。
至于那几个等式比较的语句,并不是你所说的网格较密,误差可忽略。fluent数据是real类型的,小数点位数应该在六位以上,因为是等值比较,只需要最后以为小数不等,条件就不成立 ...

在HH高度处,如果此处没有节点的话,条件不成立其实没关系的。。呵呵
附近的节点总有一个热流密度赋值给它。
问题是:
能量源项的单位是:w/m3
而这个热源是w/m2
体热源的加载都是用能量源项表示,我就疑惑了~。
但文献表示这个热源就是热流密度。。。

用message是个好方法,接触udf几个月,
没有调试经验,谢谢你的建议。


先做最重要的事情,再做次重要的事情
5楼2012-03-05 16:19:29
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

nuliwo1

银虫 (小有名气)

引用回帖:
6楼: Originally posted by b07988 at 2012-03-05 18:09:05:
仔细看了下q(0,0),单位是w/m3,是一种随坐标和时间变化的体热成率。

你好,你这问题解决了吗?
7楼2012-03-06 20:36:41
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

b07988

金虫 (正式写手)

星期六可以休息

引用回帖:
: Originally posted by nuliwo1 at 2012-03-06 20:36:41:
你好,你这问题解决了吗?

看其他的热源能量源项,要加循环。目前未解决。
先做最重要的事情,再做次重要的事情
8楼2012-03-07 12:15:11
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

科研小王子

铜虫 (初入文坛)

哎呀,,我现在也是做这个东西,,,愁死了
9楼2012-11-28 11:20:18
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

zkatie

铜虫 (初入文坛)

【答案】应助回帖

xiegangmai: 谢谢参与,非应助请勿选择“应助回帖” 2012-11-30 19:05:38
我也想做这方面的,但是还没有头绪,请楼主指点一下。
爱生活,爱自己。
10楼2012-11-30 11:23:27
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 b07988 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 288资源与环境专硕求调剂,不限专业,有学上就行 +11 lllllos 2026-03-30 11/550 2026-03-30 21:19 by 研究僧导导
[考研] 调剂 +4 GK72 2026-03-30 4/200 2026-03-30 20:32 by dick_runner
[考研] 化学0703 调剂 306分 一志愿211 +8 26要上岸 2026-03-28 8/400 2026-03-30 16:39 by herarysara
[考研] 324求调剂 +9 hanamiko 2026-03-26 11/550 2026-03-30 14:27 by JourneyLucky
[考研] 南京大学化学调剂 +10 景随风 2026-03-29 15/750 2026-03-30 11:21 by limeifeng
[考研] 296求调剂 +10 彼岸t 2026-03-29 10/500 2026-03-30 10:50 by 探123
[考研] 0856求调剂 +8 楒桉 2026-03-28 8/400 2026-03-30 10:00 by wzy-lxz
[考研] 343求调剂 +5 爱羁绊 2026-03-28 5/250 2026-03-28 20:53 by 唐沐儿
[考研] 085602 化工专硕 338分 求调剂 +12 路痴小琪 2026-03-27 12/600 2026-03-28 15:41 by L135790
[考研] 347求调剂 +3 山顶见α 2026-03-25 3/150 2026-03-28 14:13 by 唐沐儿
[考研] 304求调剂 +6 曼殊2266 2026-03-27 6/300 2026-03-28 14:10 by 唐沐儿
[考研] 070300求调剂306分 +4 26要上岸 2026-03-27 4/200 2026-03-28 13:06 by 唐沐儿
[考研] 266分,求材料冶金能源化工等调剂 +7 哇呼哼呼哼 2026-03-27 9/450 2026-03-28 12:22 by zllcz
[考研] 085602 307分 求调剂 +7 不知道叫什么! 2026-03-26 7/350 2026-03-28 09:57 by 神马都不懂
[考研] 求调剂推荐 材料 304 +15 荷包蛋hyj 2026-03-26 15/750 2026-03-28 04:13 by fmesaito
[考研] 一志愿211院校 344分 东北农业大学生物学学硕,求调剂 +5 丶风雪夜归人丶 2026-03-26 8/400 2026-03-27 19:22 by 丶风雪夜归人丶
[考研] 考研调剂 +10 呼呼?~+123456 2026-03-24 10/500 2026-03-27 11:46 by wangjy2002
[考研] 303求调剂 +6 蓝山月 2026-03-25 6/300 2026-03-25 22:47 by 418490947
[考研] 07化学303求调剂 +5 睿08 2026-03-25 5/250 2026-03-25 22:46 by 418490947
[考研] 347求调剂 +4 L when 2026-03-25 4/200 2026-03-25 13:37 by cocolv
信息提示
请填处理意见