| 3 | 1/1 | 返回列表 |
| 查看: 1143 | 回復: 2 | ||
王周鵬新蟲 (小有名氣)
|
[求助]
請高手幫我看看我的關(guān)于體積力UDF中的錯誤
|
|
#include "udf.h" #define TSTART 0.0 #define d 0.00085 #define pi 3.14 #define a 3e-7 #define m0 20 #define R 0.0005 #define c 0.1 #define u 1.256e-6 DEFINE_DPM_BODY_FORCE(particle_body_force, p, i) { real VCP,cc,m,z0,r,x,y,z,bforce; if(P_TIME(p)>=TSTART) { x=P_POS(p)[0];/顆粒在X軸上的坐標 y=P_POS(p)[1];/顆粒在Y軸上的坐標 z=P_POS(p)[2];/顆粒在Z軸上的坐標 VCP=4.0*pi*a*a*a/3.0;/顆粒的體積 cc=c/(3+c); m=pow(m0,2); z0=z+R+d; r=sqrt(x*x+y*y+z0*z0); if(i==0) bforce=-9.0*u*cc*VCP*m*x*(4*z0*z0+r*r)/(16*pi*pi*(pow(r,10)));/X方向的體積力 else if(i==1) bforce=-9.0*u*cc*VCP*m*y*(4*z0*z0+r*r)/(16*pi*pi*(pow(r,10)));/Y方向的體積力 else if(i==2) bforce=-9.0*u*cc*VCP*m*(4*z0*z0*z0)/(16*pi*pi*(pow(r,10)));/Z方向的體積力 } else bforce=0.0; /* an acceleration should be returned */ return (bforce/P_MASS(p)); } [ Last edited by 王周鵬 on 2014-1-6 at 21:17 ] |
木蟲 (著名寫手)

新蟲 (小有名氣)
| 3 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 323求調(diào)劑 +6 | 洼小桶 2026-03-18 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 280分求調(diào)劑 一志愿085802 +4 | PUMPT 2026-03-22 | 7/350 |
|
|
[考研] 求調(diào)劑一志愿海大,0703化學學碩304分,有大創(chuàng)項目,四級已過 +6 | 幸運哩哩 2026-03-22 | 10/500 |
|
|
[考研] 08工科 320總分 求調(diào)劑 +11 | 梨花珞晚風 2026-03-17 | 11/550 |
|
|
[考研] 293求調(diào)劑 +12 | zjl的號 2026-03-16 | 17/850 |
|
|
[考研] 298求調(diào)劑一志愿211 +3 | 上岸6666@ 2026-03-20 | 3/150 |
|
|
[考研] 能源材料化學課題組招收碩士研究生8-10名 +5 | 脫穎而出 2026-03-16 | 17/850 |
|
|
[考研] 求調(diào)劑 +5 | Zhangbod 2026-03-21 | 7/350 |
|
|
[考研] 0856材料專碩353求調(diào)劑 +4 | NIFFFfff 2026-03-20 | 4/200 |
|
|
[考研] 311求調(diào)劑 +3 | 勇敢的小吳 2026-03-20 | 3/150 |
|
|
[考研] 330求調(diào)劑0854 +3 | assdll 2026-03-21 | 3/150 |
|
|
[考研] 機械專碩299求調(diào)劑至材料 +3 | kkcoco25 2026-03-16 | 4/200 |
|
|
[考研] 一志愿天津大學化學工藝專業(yè)(081702)315分求調(diào)劑 +12 | yangfz 2026-03-17 | 12/600 |
|
|
[考研] 295求調(diào)劑 +4 | 一志愿京區(qū)211 2026-03-18 | 6/300 |
|
|
[考研] 085600材料與化工 +8 | 安全上岸! 2026-03-16 | 8/400 |
|
|
[考研] 08工學調(diào)劑 +5 | 用戶573181 2026-03-20 | 5/250 |
|
|
[考研] 本科鄭州大學物理學院,一志愿華科070200學碩,346求調(diào)劑 +4 | 我不是一根蔥 2026-03-18 | 4/200 |
|
|
[考研] 085601專碩,總分342求調(diào)劑,地區(qū)不限 +5 | share_joy 2026-03-16 | 5/250 |
|
|
[考研] 085601求調(diào)劑 +4 | Du.11 2026-03-16 | 4/200 |
|
|
[考研] 一志愿蘇州大學材料工程(085601)專碩有科研經(jīng)歷三項國獎兩個實用型專利一項省級立項 +6 | 大火山小火山 2026-03-16 | 8/400 |
|