| 5 | 1/1 | 返回列表 |
| 查看: 6078 | 回復(fù): 21 | ||||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | ||||
enigmafwj捐助貴賓 (小有名氣)
|
[求助]
【求助】FLUENT UDF 氣液兩相流 汽蝕 汽化潛熱(問題詳見內(nèi)容)
|
|||
|
為液相、氣相質(zhì)量方程和能量方程添加源項(xiàng),UDF程序如下,汽化、液化由壓力控制(壓力條件判斷),各物性參數(shù)用溫度擬合。問題是:編譯時(shí),提示有語法錯(cuò)誤(parse),并且fv為未聲明的變量。請(qǐng)問如何解決?另:程序中有其他不妥之處,煩請(qǐng)指教,謝謝! #include "udf.h" #include "sg_mphase.h" DEFINE_SOURCE(liq_m,c,l_t,dS,eqn) /*液相質(zhì)量輸運(yùn)源項(xiàng)*/ { Thread *m_t,*v_t; /*計(jì)算區(qū)域指針*/ m_t=THREAD_SUPER_THREAD(l_t); /*混合區(qū)液相指針*/ v_t=THREAD_SUB_THREAD(m_t,1); /*單相區(qū)氣相指針*/ real m_dot_l; /*液相質(zhì)量輸運(yùn)量*/ real stc; /*液氧表面張力系數(shù)*/ real fv; /*氣相質(zhì)量分?jǐn)?shù)*/ fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t)); real pres_vap,pres_sat,pres_turb; /*液氧飽和蒸汽壓(考慮湍流影響)*/ if(C_T(c,m_t)>154.58) { stc=0; pres_sat=5.041e6; } else if(C_T(c,m_t)>54.36) { stc=0.038066*pow(1-C_T(c,l_t)/154.58,1.2136); pres_sat=133.322*pow(10,20.6695-526.97/C_T(c,l_t)-6.7062*log10(C_T(c,l_t))+0.012926*C_T(c,l_t)-C_T(c,l_t)*C_T(c,l_t)*(9.8832e-13)); } else { stc=0.0225; pres_sat=146.041; } pres_turb=0.39*C_R(c,l_t)*C_K(c,m_t); pres_vap=pres_sat+0.5*pres_turb; if(C_P(c,m_t)<=pres_vap) /*液相汽化*/ { m_dot_l=-0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t)))*(1-fv); dS[eqn]=-0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t))); } else /*氣相液化*/ { m_dot_l=0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t)))*fv; dS[eqn]=0; } return m_dot_l; } DEFINE_SOURCE(vap_m,c,v_t,dS,eqn) /*氣相質(zhì)量輸運(yùn)源項(xiàng)*/ { Thread *m_t,*l_t; /*計(jì)算區(qū)域指針*/ m_t=THREAD_SUPER_THREAD(v_t); /*混合區(qū)氣相指針*/ l_t=THREAD_SUB_THREAD(m_t,0); /*單相區(qū)液相指針*/ real m_dot_v; /*氣相質(zhì)量輸運(yùn)量*/ real stc; /*液氧表面張力系數(shù)*/ real fv; /*氣相質(zhì)量分?jǐn)?shù)*/ fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t)); real pres_vap,pres_sat,pres_turb; /*液氧飽和蒸汽壓(考慮湍流影響)*/ if(C_T(c,m_t)>154.58) { stc=0; pres_sat=5.041e6; } else if(C_T(c,m_t)>54.36) { stc=0.038066*pow(1-C_T(c,l_t)/154.58,1.2136); pres_sat=133.322*pow(10,20.6695-526.97/C_T(c,l_t)-6.7062*log10(C_T(c,l_t))+0.012926*C_T(c,l_t)-C_T(c,l_t)*C_T(c,l_t)*(9.8832e-13)); } else { stc=0.0225; pres_sat=146.041; } pres_turb=0.39*C_R(c,l_t)*C_K(c,m_t); pres_vap=pres_sat+0.5*pres_turb; if(C_P(c,m_t)<=pres_vap) /*液相汽化*/ { m_dot_v=0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t)))*(1-fv); dS[eqn]=0; } else /*氣相液化*/ { m_dot_l=-0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t)))*fv; dS[eqn]=-0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t))); } return m_dot_v; } DEFINE_SOURCE(m_enrg,c,m_t,dS,eqn) /*混合相能量方程輸運(yùn)源項(xiàng)*/ { Thread *l_t,*v_t; /*計(jì)算區(qū)域指針*/ l_t=THREAD_SUB_THREAD(m_t,0); /*混合區(qū)液相指針*/ v_t=THREAD_SUB_THREAD(m_t,1); /*混合區(qū)氣相指針*/ real m_dot; /*相變質(zhì)量*/ real hc; /*汽化潛熱*/ real source; /*能量方程源項(xiàng)*/ real stc; /*液氧表面張力系數(shù)*/ real fv; /*氣相質(zhì)量分?jǐn)?shù)*/ fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t)); real pres_vap,pres_sat,pres_turb; /*液氧飽和蒸汽壓(考慮湍流影響)*/ if(C_T(c,m_t)>154.58) { stc=0; pres_sat=5.041e6; hc=0; } else if(C_T(c,m_t)>54.36) { stc=0.038066*pow(1-C_T(c,l_t)/154.58,1.2136); pres_sat=133.322*pow(10,20.6695-526.97/C_T(c,l_t)-6.7062*log10(C_T(c,l_t))+0.012926*C_T(c,l_t)-C_T(c,l_t)*C_T(c,l_t)*(9.8832e-13)); hc=8040*pow(1-C_T(c,l_t)/154.58,0.201); } else { stc=0.0225; pres_sat=146.041; hc=2523; } pres_turb=0.39*C_R(c,l_t)*C_K(c,m_t); pres_vap=pres_sat+0.5*pres_turb; if(C_P(c,m_t)<=pres_vap) /*液相汽化,溫度升高,源項(xiàng)為正*/ { m_dot=0.02*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,v_t)*sqrt((2*(pres_vap-C_P(c,m_t)))/(3*C_R(c,l_t)))*(1-fv); source=m_dot*hc; dS[eqn]=0; } else /*氣相液化,溫度降低,源項(xiàng)為負(fù)*/ { m_dot=-0.01*sqrt(C_K(c,m_t))/stc*C_R(c,l_t)*C_R(c,l_t)*sqrt((2*(C_P(c,m_t)-pres_vap))/(3*C_R(c,l_t)))*fv; source=-m_dot*hc; dS[eqn]=0; } return source; } |
多相流UDF | 傳熱傳質(zhì) |
捐助貴賓 (小有名氣)
|
因?yàn)槟闼鶈柕倪@兩句,是在氣相質(zhì)量方程源項(xiàng)里的,DEFINE_SOURCE(vap_m,c,v_t,dS,eqn)里的thread:v_t在該宏應(yīng)用于氣相質(zhì)量方程時(shí)指向了氣相區(qū)。因?yàn)橹笠玫交旌蠀^(qū)氣相的參數(shù),所以用THREAD_SUPER_THREAD(v_t)把指針恢復(fù)到混合區(qū)氣相并傳給m_t; THREAD_SUB_THREAD(m_t,0)的意思是在m_t得到混合區(qū)氣相指針后,m_t作為最高區(qū)域(混合區(qū))的指針,可以用這個(gè)函數(shù)把單相區(qū)液相指針傳給l_t,才能用l_t調(diào)用到液相區(qū)的參數(shù),0指的是主相(液相),1指的是次相(氣相)。 |
|
real fv; /*氣相質(zhì)量分?jǐn)?shù)*/ fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t)); real pres_vap,pres_sat,pres_turb; /*液氧飽和蒸汽壓(考慮湍流影響)*/ 改為: real pres_vap,pres_sat,pres_turb; /*液氧飽和蒸汽壓(考慮湍流影響)*/ real fv; /*氣相質(zhì)量分?jǐn)?shù)*/ fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t)); 定義變量要在賦值語句開始之前全部定義完畢。 另外向兄臺(tái)請(qǐng)教一下,這兩句的thread具體指什么thread,感激不盡啊。 m_t=THREAD_SUPER_THREAD(v_t); /*混合區(qū)氣相指針*/ l_t=THREAD_SUB_THREAD(m_t,0); /*單相區(qū)液相指針*/ 為啥第一句是“混合區(qū)氣相指針”,而第二句跑到“單相區(qū)液相指針”了呢 |
|
感謝兄臺(tái),受教了。我本來沒做多相流,但對(duì)這個(gè)有點(diǎn)興趣。 再問幾個(gè)小白的問題可以不。比如我按下面這樣理解對(duì)頭不: 氣相區(qū)----就是指這個(gè)區(qū)域的CELL只有氣相; 液相區(qū)----就是指這個(gè)區(qū)域的CELL只有液相; 混合區(qū)----就是指這個(gè)區(qū)域的CELL既有氣相也有液相; 混全區(qū)thread----是說混合區(qū)既然有混合thread,又有氣相thread,還有液相thead。氣相thread液相thread混合thread怎么聯(lián)系起來啊,糊涂了 |
捐助貴賓 (小有名氣)
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料與化工(0856)304求B區(qū)調(diào)劑 +6 | 邱gl 2026-03-30 | 11/550 |
|
|---|---|---|---|---|
|
[考研] 材料科學(xué)與工程調(diào)劑 +13 | 深V宿舍吧 2026-03-30 | 14/700 |
|
|
[考研]
|
小羊36 2026-03-30 | 4/200 |
|
|
[考研] 考研材料工程351分調(diào)劑 +3 | 整個(gè)好的 2026-03-31 | 3/150 |
|
|
[考研] 環(huán)境工程297分求調(diào)劑一志愿杭高院 +5 | GENJIOW 2026-03-31 | 5/250 |
|
|
[考研] 286求調(diào)劑 +5 | 丟掉懶惰 2026-03-27 | 8/400 |
|
|
[考研] 289求調(diào)劑 +6 | BrightLL 2026-03-29 | 6/300 |
|
|
[考研] 0817化工學(xué)碩調(diào)劑 +7 | 努力上岸中! 2026-03-31 | 7/350 |
|
|
[考研] 083000環(huán)境科學(xué)與工程調(diào)劑,總分281 +4 | 橙子(勝意) 2026-03-30 | 4/200 |
|
|
[考研] 285求調(diào)劑 +6 | AZMK 2026-03-29 | 9/450 |
|
|
[考研] 342求調(diào)劑 +4 | 加油a李zs 2026-03-26 | 4/200 |
|
|
[考研] 284求調(diào)劑 +14 | junqihahaha 2026-03-26 | 15/750 |
|
|
[考研] 生物技術(shù)與工程 +7 | 1294608413 2026-03-25 | 8/400 |
|
|
[考研] 考研調(diào)劑 +7 | 小蠟新筆 2026-03-29 | 7/350 |
|
|
[碩博家園] 招收生物學(xué)/細(xì)胞生物學(xué)調(diào)劑 +4 | IceGuo 2026-03-26 | 5/250 |
|
|
[考研] 0856,材料與化工321分求調(diào)劑 +12 | 大饞小子 2026-03-27 | 13/650 |
|
|
[考研] 275求調(diào)劑 +10 | jjjjjjjjjjl 2026-03-27 | 10/500 |
|
|
[考研]
|
18419759900 2026-03-25 | 8/400 |
|
|
[考研] 085600,材料與化工321分,求調(diào)劑 +9 | 大饞小子 2026-03-27 | 9/450 |
|
|
[考研] 085600,材料與化工321分調(diào)劑 +4 | 大饞小子 2026-03-27 | 6/300 |
|