| 4 | 1/1 | 返回列表 |
| 查看: 1650 | 回復(fù): 3 | ||
wzwyl2010新蟲 (初入文壇)
|
[求助]
UDF并行編譯求助-附程序段
|
|
單核編譯UDF成功計(jì)算 為了提高計(jì)算速度現(xiàn)在對udf并行編譯 由于程序段較多,涉及宏 DEFINE_ADJUST 、DEFINE_SOURCE 、DEFINE_PROFILE、DEFINE_DIFFUSIVITY、Message以及sum求和等并行編譯起來比較麻煩。Help里有介紹并行編譯時,如果涉及HOST和NODE之間的數(shù)據(jù)交換以及在求和時候,在程序段加一些并行宏如#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)容被屏蔽 |
| 4 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料工程(專)一志愿985 初試335求調(diào)劑 +3 | hiloiy 2026-03-17 | 4/200 |
|
|---|---|---|---|---|
|
[考研] 299求調(diào)劑 +6 | △小透明* 2026-03-17 | 6/300 |
|
|
[考研] 華東師范大學(xué)-071000生物學(xué)-293分-求調(diào)劑 +3 | 研究生何瑤明 2026-03-18 | 3/150 |
|
|
[考研] 354求調(diào)劑 +5 | Tyoumou 2026-03-18 | 8/400 |
|
|
[考研] 22408 344分 求調(diào)劑 一志愿 華電計(jì)算機(jī)技術(shù) +4 | solanXXX 2026-03-20 | 4/200 |
|
|
[考研] 294求調(diào)劑材料與化工專碩 +15 | 陌の森林 2026-03-18 | 15/750 |
|
|
[考研] 一志愿蘇州大學(xué)材料求調(diào)劑,總分315(英一) +5 | sbdksD 2026-03-19 | 5/250 |
|
|
[考研] 353求調(diào)劑 +3 | 拉鉤不許變 2026-03-20 | 3/150 |
|
|
[考研] 一志愿吉林大學(xué)材料學(xué)碩321求調(diào)劑 +11 | Ymlll 2026-03-18 | 15/750 |
|
|
[考研] 0703化學(xué)調(diào)劑 ,六級已過,有科研經(jīng)歷 +13 | 曦熙兮 2026-03-15 | 13/650 |
|
|
[考研] 286分人工智能專業(yè)請求調(diào)劑愿意跨考! +3 | lemonzzn 2026-03-17 | 4/200 |
|
|
[考研] 材料考研調(diào)劑 +3 | xwt。 2026-03-19 | 3/150 |
|
|
[考研] 328求調(diào)劑,英語六級551,有科研經(jīng)歷 +4 | 生物工程調(diào)劑 2026-03-16 | 12/600 |
|
|
[考研] 302求調(diào)劑 +10 | 呼呼呼。。。。 2026-03-17 | 10/500 |
|
|
[考研] 268求調(diào)劑 +6 | 簡單點(diǎn)0 2026-03-17 | 6/300 |
|
|
[考研] 293求調(diào)劑 +11 | zjl的號 2026-03-16 | 16/800 |
|
|
[考博] 26申博 +4 | 八6八68 2026-03-16 | 4/200 |
|
|
[考研] 一志愿,福州大學(xué)材料專碩339分求調(diào)劑 +3 | 木子momo青爭 2026-03-15 | 3/150 |
|
|
[考研] 321求調(diào)劑 +5 | 大米飯! 2026-03-15 | 5/250 |
|
|
[考研] 326求調(diào)劑 +3 | mlpqaz03 2026-03-15 | 3/150 |
|