24小时热门版块排行榜    

查看: 1944  |  回复: 9

如果——有

新虫 (初入文坛)

[交流] 谁有二维高斯分布热源udf程序?

谁有二维高斯分布热源udf程序?可以加载在面区域上的。
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
本帖仅楼主可见
2楼2016-06-13 09:00:53
已阅   申请仿真EPI   回复此楼   编辑   查看我的主页
祝福
3楼2016-06-13 12:35:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

如果——有

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by xpxp1991 at 2016-06-13 09:00:53
热源程序你可以自己通过UDF编写呢,采用Fluent自带的define宏区定义,然后保存为.c文件,define-user defined-functions-interpreted解释下就可以了呢。

自己编写的老有错误,你要编好的udf程序吗?
4楼2016-06-13 23:54:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

匿名

用户注销 (文坛精英)


小木虫: 金币+0.5, 给个红包,谢谢回帖
本帖仅楼主可见
5楼2016-06-14 00:27:12
已阅   申请仿真EPI   回复此楼   编辑   查看我的主页

如果——有

新虫 (初入文坛)

引用回帖:
5楼: Originally posted by 硫酸亚铜 at 2016-06-14 00:27:12
把你的代码铁上来

#include "udf.h"
DEFINE_SOURCE(heat,c,t,dS,eqn)
{
real source,r0,Q,a,v,time,m,n,p,H,r;
real x[ND_ND];
r0=0.00075;
H=0.0025;
Q=1350;
a=0.8;
v=0;
time=CURRENT_TIME;
begin_c_loop(c,t)
{
C_CENTROID(x,c,t);
m=x[0];
n=x[1];
r=sqrt(m*m+(0-v*time)*(0-v*time));

if(sqrt(x[1]*x[1])<=0.003)
   source=9*a*Q/(M_PI*r0*r0*H*(1-exp(-3)))*exp(9*r*r/(r0*r0*log((fabs(n)/H))));
else
   source=0;}
end_c_loop(f,t)
}
dS[eqn]=0;
return source;
}
6楼2016-06-14 19:39:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

如果——有

新虫 (初入文坛)

引用回帖:
6楼: Originally posted by 如果——有 at 2016-06-14 19:39:06
#include "udf.h"
DEFINE_SOURCE(heat,c,t,dS,eqn)
{
real source,r0,Q,a,v,time,m,n,p,H,r;
real x;
r0=0.00075;
H=0.0025;
Q=1350;
a=0.8;
v=0;
time=CURRENT_TIME;
begin_c_loop(c,t)
{
...

加载相当于没加一样。
7楼2016-06-14 19:40:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
祝福
8楼2016-06-14 19:58:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
祝福
9楼2016-06-15 12:55:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小七工作室1

新虫 (著名写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
这个做的比较多,可以交流下
10楼2016-06-15 14:22:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 如果——有 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 5lbyq5wrhb 2026-02-07 4/200 2026-02-08 08:47 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 5lbyq5wrhb 2026-02-07 4/200 2026-02-08 08:46 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 3rkserf6qr 2026-02-07 4/200 2026-02-08 08:27 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +5 2h7du0nuhk 2026-02-07 6/300 2026-02-08 08:26 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +5 2h7du0nuhk 2026-02-07 6/300 2026-02-08 08:12 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 6/300 2026-02-08 08:07 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 08:06 by vs90ilomwc
[教师之家] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 07:52 by vs90ilomwc
[找工作] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 07:46 by vs90ilomwc
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 8/400 2026-02-08 07:32 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 8/400 2026-02-08 07:27 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 8/400 2026-02-08 07:07 by vs90ilomwc
[教师之家] 有院领导为了换新车,用横向课题经费买了俩车 +7 瞬息宇宙 2026-02-04 7/350 2026-02-07 21:47 by tfang
[有机交流] 酰胺脱乙酰基 10+5 chibby 2026-02-03 12/600 2026-02-07 19:29 by 江东闲人
[基金申请] 同年申请2项不同项目,第1个项目里不写第2个项目的信息,可以吗 +4 hitsdu 2026-02-06 4/200 2026-02-07 13:07 by jurkat.1640
[基金申请] 有时候真觉得大城市人没有县城人甚至个体户幸福 +9 苏东坡二世 2026-02-04 10/500 2026-02-07 12:37 by 小毛球
[考博] 天津大学招2026.09的博士生,欢迎大家推荐交流(博导是本人) +4 a793625982 2026-02-05 5/250 2026-02-07 10:57 by a793625982
[公派出国] CSC & MSCA 博洛尼亚大学能源材料课题组博士/博士后招生|MSCA经费充足、排名优 +4 雨念 2026-02-01 6/300 2026-02-06 23:32 by MelissaPon
[基金申请] 面上项目申报 +3 Tide man 2026-02-01 3/150 2026-02-05 22:56 by god_tian
[教师之家] 遇见不省心的家人很难过 +18 otani 2026-02-03 22/1100 2026-02-04 11:06 by tangmnt
信息提示
请填处理意见