版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

返回列表

super雪儿

新虫 (正式写手)

应助: 1 (幼儿园)
金币: 1736.4
散金: 928
红花: 3
帖子: 833
在线: 131小时
虫号: 3513169
注册: 2014-11-01
专业: 金属材料的微观结构

[求助] 尴尬做一次伸手党谁有高斯热源模型的UDF编程的程序啊，跪求

如题，一点C++基础都没有，我现在在学，但是希望能先有个高斯热源模型能加载上，哪位大神有的话可不可以让我用一下，谢谢了啊

发自小木虫Android客户端

回复此楼

» 猜你喜欢

拟解决的关键科学问题还要不要写已经有11人回复
救命帖已经有5人回复
限项规定已经有5人回复
为什么nbs上溴没有产物点出现呢已经有9人回复
招博士已经有3人回复
存款400万可以在学校里躺平吗已经有35人回复
最失望的一年已经有18人回复
求推荐博导已经有4人回复
求推荐英文EI期刊已经有5人回复
疑惑？已经有5人回复

1楼 2016-11-14 14:01:02

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

super雪儿

新虫 (正式写手)

应助: 1 (幼儿园)
金币: 1736.4
散金: 928
红花: 3
帖子: 833
在线: 131小时
虫号: 3513169
注册: 2014-11-01
专业: 金属材料的微观结构

引用回帖:

1楼: Originally posted by super雪儿 at 2016-11-14 14:01:02
如题，一点C++基础都没有，我现在在学，但是希望能先有个高斯热源模型能加载上，哪位大神有的话可不可以让我用一下，谢谢了啊

或者谁能推荐我UDF学习经验啊？

发自小木虫Android客户端

赞一下

回复此楼

2楼2016-11-14 18:21:47

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

gyctju

金虫 (正式写手)

应助: 314 (大学生)
金币: 941
散金: 227
红花: 48
沙发: 3
帖子: 994
在线: 427.5小时
虫号: 1569491
注册: 2012-01-08
专业: 分离过程

1，
# include"udf.h"
DEFINE_PROFILE(heat_flux,t,i)
{
      real xx[ND_ND];
      real a, pi, r, ef,p, heat, x,y;
      face_t f;
      ef= 0.8;
            pi = 3.141596;
            r = 0.003;
            p=1400;
            heat = 3 *ef*p / (pi*r*r);
                     begin_f_loop(f,t)
            {
                              x = xx[0];
                              y = xx[1];
                              if (sqrt(x*x + y*y) <= 0.003)
                                    F_PROFILE(f, t, i) = heat*exp(-3 * (x*x + y*y) / (r*r));
                              else F_PROFILE(f,t,i) = 0;
                     }
            end_f_loop(f,t)
}

2，
# include "udf.h"
# define v 10
# define delt .05
# define delx .5
# define I0 2*10000000
# define n 39
DEFINE_PROFILE(g_profile,t,i)
{
int x[ND_ND];
int j,k;
double xreg;
double xl[39],I[39],y[39];
face_t f;
/*xl= (v*delt)+(delx/2);*/
begin_f_loop(f,t)
{
F_CENTROID(x,f,t);
y[0]=x[1];
for(j=1;j<=n;j++)
{
y[j]=(j-1)*delt;
/*k=j;*/
xl[j]=(j-1)*v*delt;
printf("%f\n",&xl[j]);
/*xreg=(y[j]-xl[j]);*/
/*double fabs(double (y[j]-xl[j]));*/
{
if ((y[j]-xl[j]) < 0)
xreg = -1*(y[j]-xl[j]);
else
xreg = (y[j]-xl[j]);
}
if(xreg<delx)
{
I[j]=I0*exp((-2*((xreg)*(xreg)))/(delx*delx));
}
else
{
I[j]=0;
}
printf( "%f\n", &I[j]);
}
}
end_f_loop(f,t)
}

赞一下

回复此楼

3楼2016-11-14 21:01:41

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

malasong9471

木虫 (正式写手)

应助: 58 (初中生)
金币: 7237
红花: 29
帖子: 639
在线: 117.1小时
虫号: 4100890
注册: 2015-09-25
性别: GG
专业: 工程热力学

1新建一个/从别人那拷贝一个.c的文件，用txt打开编辑2将楼上的udf内容复制粘贴进去3加载udf

发自小木虫Android客户端

赞一下

回复此楼

4楼2016-11-14 22:51:54

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

super雪儿

新虫 (正式写手)

应助: 1 (幼儿园)
金币: 1736.4
散金: 928
红花: 3
帖子: 833
在线: 131小时
虫号: 3513169
注册: 2014-11-01
专业: 金属材料的微观结构

引用回帖:

3楼: Originally posted by gyctju at 2016-11-14 21:01:41
1，
# include"udf.h"
DEFINE_PROFILE(heat_flux,t,i)
{
      real xx;
      real a, pi, r, ef,p, heat, x,y;
      face_t f;
      ef= 0.8;
            pi = 3.141596;
   ...

大神，太感谢你了，为什么是两个啊？都是高斯热源吗？

发自小木虫Android客户端

赞一下

回复此楼

5楼2016-11-15 06:58:53

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