| 5 | 1/1 | 返回列表 |
| 查看: 2251 | 回復(fù): 5 | ||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | ||
renzhihao新蟲 (小有名氣)
|
[求助]
想模擬單個氣泡的潰滅,想用fluent編程把壓力導(dǎo)入進(jìn)去,用的vof模型。
|
|
|
我在做空化,想模擬單個氣泡的潰滅,但是現(xiàn)在要求內(nèi)部流體的壓力是個隨著位置變化的函數(shù),想用fluent編程把壓力導(dǎo)入進(jìn)去,用的vof模型。 下面的為我從別的帖子里面看到的。想問下這些東西需要在fluent里面設(shè)置還是編程? 為液相、氣相質(zhì)量方程和能量方程添加源項(xiàng),UDF程序如下,汽化、液化由壓力控制(壓力條件判斷),各物性參數(shù)用溫度擬合。問題是:編譯時,提示有語法錯誤(parse),并且fv為未聲明的變量。請問如何解決?另:程序中有其他不妥之處,煩請指教,謝謝! #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; /*計算區(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; /*計算區(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; /*計算區(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; } 這些東西直接在fluent里面設(shè)置行嗎,還是必須要編程? |
新蟲 (小有名氣)
銅蟲 (小有名氣)

新蟲 (小有名氣)
版主 (知名作家)

| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 281求調(diào)劑 +4 | 亞克西good 2026-03-26 | 6/300 |
|
|---|---|---|---|---|
|
[考研] 求調(diào)劑 +4 | 青春裁為三截 2026-03-29 | 4/200 |
|
|
[考研] 求調(diào)劑,一志愿 南京航空航天大學(xué) ,080500材料科學(xué)與工程學(xué)碩,總分289分 +7 | @taotao 2026-03-29 | 7/350 |
|
|
[考研] 071000生物學(xué)求調(diào)劑,初試成績343 +7 | 小小甜面團(tuán) 2026-03-25 | 7/350 |
|
|
[考研] 312,生物學(xué)求調(diào)劑 +3 | 小譯同學(xué)abc 2026-03-28 | 3/150 |
|
|
[考研] 320分,材料與化工專業(yè),求調(diào)劑 +9 | 一定上岸aaa 2026-03-27 | 13/650 |
|
|
[考研] 339求調(diào)劑,想調(diào)回江蘇 +6 | 烤麥芽 2026-03-27 | 8/400 |
|
|
[考研] 315分求調(diào)劑 +7 | 26考研上岸版26 2026-03-26 | 7/350 |
|
|
[考研] 070300化學(xué)求調(diào)劑 +4 | 起個名咋這么難 2026-03-27 | 4/200 |
|
|
[考研] 考研調(diào)劑 +4 | Sanmu-124 2026-03-26 | 4/200 |
|
|
[考研]
|
18419759900 2026-03-25 | 8/400 |
|
|
[考研] 安徽大學(xué)專碩生物與醫(yī)藥專業(yè)(086000)324分,英語已過四六級,六級521,求調(diào)劑 +4 | 美味可樂雞翅 2026-03-26 | 4/200 |
|
|
[考研] 一志愿華東理工大學(xué)081700,初試分?jǐn)?shù)271 +6 | kotoko_ik 2026-03-23 | 7/350 |
|
|
[考研] 求調(diào)劑 +3 | 劉柯@ 2026-03-24 | 4/200 |
|
|
[考研] 機(jī)械學(xué)碩總分317求調(diào)劑。。! +4 | Acaciad 2026-03-25 | 4/200 |
|
|
[考研] 26考研-291分-廈門大學(xué)(085601)-柔性電子學(xué)院材料工程專業(yè)求調(diào)劑 +3 | min3 2026-03-24 | 4/200 |
|
|
[考研] 0854AI CV方向招收調(diào)劑 +4 | 章小魚567 2026-03-23 | 4/200 |
|
|
[考研] 調(diào)劑 +4 | 13853210211 2026-03-24 | 4/200 |
|
|
[考研] 080500求調(diào)劑 +3 | zzzzfan 2026-03-24 | 3/150 |
|
|
[考研] 求老師收我 +3 | zzh16938784 2026-03-23 | 3/150 |
|