| 查看: 2105 | 回复: 9 | |||
[交流]
谁有二维高斯分布热源udf程序？
|
| 谁有二维高斯分布热源udf程序？可以加载在面区域上的。 |
回复此楼» 猜你喜欢
为什么资助数各大高校都创新高，自己申请怎么就这么难
已经有10人回复
-
基金系统什么内容也没有
已经有7人回复
-
有多少人是今天查系统知道结果的？
已经有18人回复
-
国自然面上复盘~欢迎讨论
已经有12人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有3人回复
-
哪位高人中了，把查询到的截图贴出来让我看看，让我长长见识
已经有6人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有4人回复
-
面上合作单位盖章
已经有5人回复
-
导师吐槽：我怎么摊上了这么个极品研究生！
已经有7人回复
-
申请删除本帖
已经有7人回复
匿名
用户注销 (小有名气)
- 应助: 31 (小学生)
- 金币: 1248.2
- 散金: 68
- 红花: 7
- 帖子: 220
- 在线: 78.3小时
- 虫号: 0
- 注册: 2015-01-18
- 专业: 工程热物理与能源利用
2楼2016-06-13 09:00:53
| 祝福 |
3楼2016-06-13 12:35:15
4楼2016-06-13 23:54:27
匿名
用户注销 (文坛精英)
- 应助: 164 (高中生)
- 金币: 9550.6
- 散金: 34344
- 红花: 361
- 沙发: 31
- 帖子: 20580
- 在线: 3633.3小时
- 虫号: 0
- 注册: 2011-12-15
- 专业: 建筑环境与结构工程
5楼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
7楼2016-06-14 19:40:29
| 祝福 |
8楼2016-06-14 19:58:41
| 祝福 |
9楼2016-06-15 12:55:36
10楼2016-06-15 14:22:11
10