| 4 | 1/1 | 返回列表 |
| 查看: 1651 | 回復(fù): 3 | |||
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)容被屏蔽 |
| 4 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 求調(diào)劑 +3 | 十三加油 2026-03-21 | 3/150 |
|
|---|---|---|---|---|
|
[考研] 一志愿西安交通大學(xué)材料工程專業(yè) 282分求調(diào)劑 +7 | 楓橋ZL 2026-03-18 | 9/450 |
|
|
[考研] 306求調(diào)劑 +4 | chuanzhu川燭 2026-03-18 | 4/200 |
|
|
[考研] 083200學(xué)碩321分一志愿暨南大學(xué)求調(diào)劑 +3 | innocenceF 2026-03-17 | 3/150 |
|
|
[考研] 0817 化學(xué)工程 299分求調(diào)劑 有科研經(jīng)歷 有二區(qū)文章 +22 | rare12345 2026-03-18 | 22/1100 |
|
|
[考研] 招收調(diào)劑碩士 +4 | lidianxing 2026-03-19 | 12/600 |
|
|
[考研] 一志愿中國海洋大學(xué),生物學(xué),301分,求調(diào)劑 +5 | 1孫悟空 2026-03-17 | 6/300 |
|
|
[考研] 085600材料與化工求調(diào)劑 +6 | 緒幸與子 2026-03-17 | 6/300 |
|
|
[考研] 材料考研調(diào)劑 +3 | xwt。 2026-03-19 | 3/150 |
|
|
[考研] 311求調(diào)劑 +6 | 26研0 2026-03-15 | 6/300 |
|
|
[考研] 311求調(diào)劑 +11 | 冬十三 2026-03-15 | 12/600 |
|
|
[考研] 材料專碩306英一數(shù)二 +10 | z1z2z3879 2026-03-16 | 13/650 |
|
|
[考研] 312求調(diào)劑 +8 | 陌宸希 2026-03-16 | 9/450 |
|
|
[考研] 0703化學(xué)336分求調(diào)劑 +6 | zbzihdhd 2026-03-15 | 7/350 |
|
|
[考研] 277調(diào)劑 +5 | 自由煎餅果子 2026-03-16 | 6/300 |
|
|
[考研] 材料專碩326求調(diào)劑 +6 | 墨煜姒莘 2026-03-15 | 7/350 |
|
|
[考研] 085601求調(diào)劑 +4 | Du.11 2026-03-16 | 4/200 |
|
|
[考研] 一志愿,福州大學(xué)材料專碩339分求調(diào)劑 +3 | 木子momo青爭 2026-03-15 | 3/150 |
|
|
[考研] 283求調(diào)劑 +3 | 聽風(fēng)就是雨; 2026-03-16 | 3/150 |
|
|
[考研] 東南大學(xué)364求調(diào)劑 +5 | JasonYuiui 2026-03-15 | 5/250 |
|