| 5 | 1/1 | 返回列表 |
| 查看: 1665 | 回復(fù): 3 | ||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | ||
wzwyl2010新蟲 (初入文壇)
|
[求助]
UDF并行編譯求助-附程序段
|
|
|
單核編譯UDF成功計(jì)算 為了提高計(jì)算速度現(xiàn)在對(duì)udf并行編譯 由于程序段較多,涉及宏 DEFINE_ADJUST 、DEFINE_SOURCE 、DEFINE_PROFILE、DEFINE_DIFFUSIVITY、Message以及sum求和等并行編譯起來比較麻煩。Help里有介紹并行編譯時(shí),如果涉及HOST和NODE之間的數(shù)據(jù)交換以及在求和時(shí)候,在程序段加一些并行宏如#if !RP_HOST、#if !RP_NODE、node_to_host_real_2等,不知道怎么定義是否有數(shù)據(jù)交換,即添加宏的原則,如下段程序是否存在數(shù)據(jù)交換,需要怎樣添加,謝謝大牛們。。 DEFINE_ADJUST(mem,domain) { Domain*d; cell_t c; Thread*t; int MEM=46; real sum_rmem=0.00; real rmem; int i=0; t=Lookup_Thread(domain,MEM); begin_c_loop(c,t) { sum_rmem+=(1.0/(0.5139*C_UDSI(c,t,W_CONT)-0.326)*exp(1268.0*(1.0/303.0-1.0/C_T(c,t)))*0.000025); i+=1; C_UDMI(c,t,RMEM)=sum_rmem; } end_c_loop(c,t) rmem=sum_rmem/i; Message("avg_reme= %lf.\n",rmem); DEFINE_PROFILE(porosity_profile,t,i) { cell_t c; real xc[ND_ND]; real poro; real y; real per; real poro_eff; begin_c_loop(c,t) { C_CENTROID(xc,c,t); y=xc[0]; if((y>0.0010&&y<=0.0013)||(y>0.001345&&y<=0.001645)) { poro=PORO_GDL; /*擴(kuò)散層的孔隙率*/ per=PER_GDL ;/*擴(kuò)散層的滲透率*/ } else if((y>0.0013&&y<=0.00131)||(y>0.001335&&y<=0.001345)) { poro=PORO_CATA; per=PER_CATA; } else if( y>0.00131&&y<=0.001335) { poro=PORO_M; per=1.0E-18; } else { poro=0.999; per=8.0E-7; } C_UDMI(c,t,PORO)=poro; C_UDMI(c,t,PER)=per; poro_eff=poro*(1-C_UDSI(c,t,DS)); C_UDMI(c,t,PORO_EFF)=poro_eff; C_PROFILE(c,t,i)=C_UDMI(c,t,PORO_EFF); }end_c_loop(c,t) } DEFINE_SOURCE(uds_source,c,t,dS,eqn) { real source; source=C_UDMI(c,t,S_VL)*MOL_WEI_LIQ; dS[eqn]=0.; return source; } |
新蟲 (初入文壇)
|
本帖內(nèi)容被屏蔽 |
|
本帖內(nèi)容被屏蔽 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考博] 26年申博 +3 | staryer 2026-03-30 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 311求調(diào)劑 +13 | zchqwer 2026-04-01 | 15/750 |
|
|
[考研] 342求調(diào)劑 +12 | Mary Keen 2026-03-28 | 13/650 |
|
|
[考研] 一志愿西安交大材料學(xué)碩(英一數(shù)二)347,求調(diào)劑到高分子/材料相關(guān)專業(yè) +7 | zju51 2026-03-31 | 9/450 |
|
|
[考研] 生物與醫(yī)藥考研調(diào)劑 +5 | 鐵憨憨123425 2026-03-31 | 5/250 |
|
|
[考研] 材料專業(yè)調(diào)劑 +5 | 啦啦啦哭 2026-03-31 | 6/300 |
|
|
[考研] 一志愿211,335分,0856,求調(diào)劑院校和導(dǎo)師 +11 | 傾____蕭 2026-03-27 | 12/600 |
|
|
[考研] 289求調(diào)劑 +7 | BrightLL 2026-03-29 | 7/350 |
|
|
[考研] 考研調(diào)劑 +9 | 小蠟新筆 2026-03-29 | 10/500 |
|
|
[考研] 254材料與化工求調(diào)劑 +3 | 翰冬林楠 2026-03-30 | 4/200 |
|
|
[考研] 085601 329分調(diào)劑 +6 | yzsa12 2026-03-31 | 6/300 |
|
|
[考研] 272求調(diào)劑,接受跨專業(yè)調(diào)劑! +3 | 閑魚盧 2026-03-31 | 3/150 |
|
|
[考研] 334求調(diào)劑 +7 | Trying] 2026-03-31 | 7/350 |
|
|
[考研] 一志愿浙江大學(xué)工科動(dòng)力工程370,數(shù)一121,專業(yè)課135,現(xiàn)在能去哪里 +3 | 080700調(diào)劑 2026-03-30 | 4/200 |
|
|
[考研] 081200-11408-276學(xué)碩求調(diào)劑 +4 | 崔wj 2026-03-31 | 4/200 |
|
|
[考研] 327求調(diào)劑 +5 | 小卡不卡. 2026-03-29 | 5/250 |
|
|
[考研] 292求調(diào)劑 +13 | 是妍子也是研子 2026-03-30 | 13/650 |
|
|
[考研] 327求調(diào)劑 +6 | 汲亦昊 2026-03-29 | 6/300 |
|
|
[考研] 085405 考的11408求各位老師帶走 +3 | Qiu學(xué)ing 2026-03-28 | 3/150 |
|
|
[考研] 331環(huán)境科學(xué)與工程求調(diào)劑 +3 | 熠然好運(yùn)氣 2026-03-27 | 3/150 |
|