| 10 | 1/1 | 返回列表 |
| 查看: 1915 | 回復(fù): 9 | ||
super雪兒新蟲 (正式寫手)
|
[求助]
尷尬做一次伸手黨誰有高斯熱源模型的UDF編程的程序啊,跪求
|
|
如題,一點(diǎn)C++基礎(chǔ)都沒有,我現(xiàn)在在學(xué),但是希望能先有個(gè)高斯熱源模型能加載上,哪位大神有的話可不可以讓我用一下,謝謝了啊 發(fā)自小木蟲Android客戶端 |
新蟲 (正式寫手)
|
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) } |
木蟲 (正式寫手)
|
1新建一個(gè)/從別人那拷貝一個(gè).c的文件,用txt打開編輯2將樓上的udf內(nèi)容復(fù)制粘貼進(jìn)去3加載udf 發(fā)自小木蟲Android客戶端 |
新蟲 (正式寫手)
新蟲 (正式寫手)
新蟲 (正式寫手)
新蟲 (正式寫手)
新蟲 (正式寫手)
| 10 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 300求調(diào)劑,材料科學(xué)英一數(shù)二 +8 | leaflight 2026-03-24 | 8/400 |
|
|---|---|---|---|---|
|
[碩博家園] 求調(diào)劑 330分 085600材料與化工 +3 | gqhhh 2026-03-22 | 3/150 |
|
|
[考研] 317分 一志愿南理工材料工程 本科湖工大 求調(diào)劑 +7 | 芋泥小鈴鐺 2026-03-28 | 7/350 |
|
|
[考研] 一志愿華理,數(shù)一英一285求A區(qū)調(diào)劑 +8 | AZMK 2026-03-25 | 12/600 |
|
|
[考研] 277跪求調(diào)劑 +5 | 1915668 2026-03-27 | 9/450 |
|
|
[考研] 295求調(diào)劑 +5 | 1428151015 2026-03-27 | 6/300 |
|
|
[考研] 085701環(huán)境工程求調(diào)劑 +9 | 多久上課 2026-03-27 | 9/450 |
|
|
[考研] 07化學(xué)280分求調(diào)劑 +10 | 722865 2026-03-23 | 10/500 |
|
|
[考研] 一志愿鄭大085600,310分求調(diào)劑 +5 | 李瀟可 2026-03-26 | 5/250 |
|
|
[考研] 一志愿吉大071010,316分求調(diào)劑 +3 | xgbiknn 2026-03-27 | 3/150 |
|
|
[考研] 276求調(diào)劑。有半年電池和半年高分子實(shí)習(xí)經(jīng)歷 +10 | 材料學(xué)257求調(diào)劑 2026-03-23 | 11/550 |
|
|
[考研] 329求調(diào)劑 +7 | 鈕恩雪 2026-03-25 | 7/350 |
|
|
[考研] 349求調(diào)劑 +4 | 李木子啊哈哈 2026-03-25 | 4/200 |
|
|
[考研] 352求調(diào)劑 +4 | 大米飯! 2026-03-22 | 4/200 |
|
|
[考研] 334分 一志愿武理 材料求調(diào)劑 +4 | 李李不服輸 2026-03-26 | 4/200 |
|
|
[考研] 考研一志愿蘇州大學(xué)初始315(英一)求調(diào)劑 +3 | sbdksD 2026-03-24 | 4/200 |
|
|
[考研] 284求調(diào)劑 +15 | Zhao anqi 2026-03-22 | 15/750 |
|
|
[考研] 0854電子信息求調(diào)劑 324 +4 | Promise-jyl 2026-03-23 | 4/200 |
|
|
[考研] 一志愿南航材料專317分求調(diào)劑 +5 | 炸呀炸呀炸薯?xiàng)l 2026-03-23 | 5/250 |
|
|
[考研] 接收2026碩士調(diào)劑(學(xué)碩+專碩) +4 | allen-yin 2026-03-23 | 6/300 |
|