| 查看: 1055 | 回复: 6 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
[求助]
移动热源施加在一个等温面上可以实现么，怎么实现？
|
||
|
一个移动的体热源施加在一特定温度的等温面上可以实现么？ 我的3维模型，怎么实现？ |
回复此楼» 本帖已获得的红花（最新10朵）
seazsh» 猜你喜欢
考研求调剂
已经有4人回复
-
085601专硕，总分342求调剂，地区不限
已经有4人回复
-
085601材料工程专硕求调剂
已经有5人回复
-
一志愿天津大学化学工艺专业（081702）315分求调剂
已经有6人回复
-
能源材料化学课题组招收硕士研究生8-10名
已经有6人回复
-
296求调剂
已经有5人回复
-
0703化学调剂 ，六级已过，有科研经历
已经有8人回复
-
268求调剂
已经有8人回复
-
材料，纺织，生物（0856、0710），化学招生啦
已经有7人回复
-
301求调剂
已经有5人回复
7楼2012-12-25 13:10:28
onesupeng
金虫 (职业作家)
- 仿真EPI: 11
- 应助: 256 (大学生)
- 贵宾: 1.36
- 金币: 2336.2
- 散金: 9224
- 红花: 92
- 帖子: 4583
- 在线: 1303.8小时
- 虫号: 394701
- 注册: 2007-06-07
- 专业: 流体力学
2楼2012-12-11 03:43:57
3楼2012-12-11 08:05:18
|
还没有人注意啊？ 不知道这样行不行？求指教啊 DEFINE_ADJUST(coor_adjust,domain) { Thread *t; cell_t c; thread_loop_c(t,domain) { real x[ND_ND]; real xi,yi,zi; face_t f; real cs; cs=3/pow(R0,2); begin_c_loop(c,t) { real temp=C_T(c,t); if(temp=3375) { C_CENTROID(x,c,t); xi=x[0]; yi=x[1]; zi=x[2]; C_UDMI(c,t,1)=cs/(3.14159*H*(1-1/exp(3)))*exp(-(pow(xi,2)+pow(yi,2))*cs/log10(H/zi+0.0001)); } else C_UDMI(c,t,1)=0; } end_c_loop(c,t) } } DEFINE_SOURCE(energy_source,c,t,dS,eqn) { real source; real xi,yi,zi,x[ND_ND]; C_CENTROID(x,c,t); xi=x[0]; yi=x[1]; zi=x[2]; source=C_UDMI(c,t,1); dS[eqn]=0; return source; } |
6楼2012-12-16 19:35:33
20