| 2 | 1/1 | 返回列表 |
| 查看: 1500 | 回復(fù): 1 | ||
tsv249052新蟲 (著名寫手)
|
[求助]
求助,UDS源項(xiàng),一計(jì)算就發(fā)散是什么問題 已有1人參與
|
|
求助,我自己編的udf程序,使用了define adjust和uds源項(xiàng),在fluent中編譯build和加載load都沒有問題,但是計(jì)算一開始就顯示uds-0發(fā)散了,不知道是什么原因,部分代碼如下: #include "udf.h" #define PI 3.14159 /* 定義π*/ #define K 1.38e-23 /*定義玻爾茲曼常數(shù) */ #define M 2.99e-26 /*定義水分子質(zhì)量*/ #define R 461.5 /*定義水蒸氣氣體常數(shù)*/ #define f_v 0.4 /*相對(duì)濕度*/ real S1, G, J, pv1, ps1, T, P, sur_tension, density_c, density_v;/*不飽和度,吉布斯焓,成核率,水蒸氣分壓力,水蒸氣飽和壓力,溫度,壓力*/ /*計(jì)算成核率,液滴生長(zhǎng)速度,臨界半徑*/ DEFINE_ADJUST(chenghelv, d) { Thread *t; cell_t c; thread_loop_c (t,d) { begin_c_loop_all(c,t) { T = C_T(c,t); P = C_P(c,t); ps1 = -2.88934 + 0.37966 * T - 0.00925 * pow(T, 2) + 1.54e-4 * pow(T, 3);/*飽和壓力擬合*/ density_v = -0.00134 + 0.00136 * T - 3.27e-5 * pow(T, 2) + 7.76e-7 * pow(T, 3);/*蒸氣密度擬合*/ density_c = 1000.07904 + 0.01231 * T - 0.00586 * pow(T,2) + 1.6e-5 * pow(T,3);/*水密度擬合*/ sur_tension = 0.07566 - 1.41e-4 * T - 2.68e-7 * pow(T,2);/*表面張力擬合*/ S1 = P / ps1; pv1 = P * f_v; G = 16 / 3 * PI * pow((M / (density_c * log(S1) * K * T)),2) * pow(sur_tension, 3); /*計(jì)算吉布斯自由焓*/ C_UDMI(c,t,0) = sqrt(2 / PI * sur_tension) * pow(M ,-3/2) * pow(density_v, 2) / density_c * exp( -G / K * T);/*成核率*/ end_c_loop_all(c,t) } } } /*第一個(gè)輸送方程Q0源項(xiàng)*/ DEFINE_SOURCE(q0_source,c,t,dS,eqn) { return C_UDMI(c,t,0); } /*第二個(gè)輸送方程Q1源項(xiàng)*/ DEFINE_SOURCE(q1_source,c,t,dS,eqn) { return C_UDMI(c,t,0) * pow(C_UDMI(c,t,2),2) + C_R(c,t) * C_UDSI(c,t,0) * C_UDMI(c,t,1); } /*第三個(gè)輸送方程Q2源項(xiàng)*/ DEFINE_SOURCE(q2_source,c,t,dS,eqn) { return C_UDMI(c,t,0) * pow(C_UDMI(c,t,2),2) + 2 * C_R(c,t) * C_UDSI(c,t,1) * C_UDMI(c,t,1); } /*第四個(gè)輸送方程g的源項(xiàng)*/ DEFINE_SOURCE(g_source,c,t,dS,eqn) { return 4 * PI * density_c * (1/3 * C_UDMI(c,t,0) * pow(C_UDMI(c,t,2),3) + C_R(c,t) * C_UDSI(c,t,2) * C_UDMI(c,t,1)); } /*能量方程源項(xiàng)*/ DEFINE_SOURCE(energy_source,c,t,dS,eqn) { real dt, temp, L; dt = RP_Get_Real("physical-time-step" ;temp = C_T(c,t); L = 2502 - 2.42169 * temp; return L * C_UDSI(c,t,3) / dt; } |
新蟲 (初入文壇)

| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 新疆大學(xué)地質(zhì)與礦業(yè)工程學(xué)院招生 +5 | another12 2026-03-04 | 10/500 |
|
|---|---|---|---|---|
|
[考研] 招調(diào)劑 +9 | 帆船哥 2026-03-04 | 11/550 |
|
|
[考研] 0856材料與化工求調(diào)劑! +5 | 化工考生111 2026-03-04 | 11/550 |
|
|
[考研] 306求調(diào)劑 +4 | Bahati 2026-03-05 | 4/200 |
|
|
[考研] 一志愿211,0860總分286食品工程專業(yè)求調(diào)劑 +4 | 林林Winnie 2026-03-05 | 4/200 |
|
|
[考研] 材料與化工,291,求調(diào)劑 +7 | 咕嚕咕嚕123123 2026-03-05 | 8/400 |
|
|
[考研] 【求調(diào)劑】293分環(huán)境工程求調(diào)劑材料/化工,服從調(diào)劑,抗壓能力強(qiáng)! +8 | xiiiia 2026-03-04 | 8/400 |
|
|
[考研] 沒上岸的看過來 +3 | tangxiaotian 2026-03-01 | 5/250 |
|
|
[考研] 085701環(huán)境工程 求調(diào)劑 +7 | xiiiia 2026-03-04 | 7/350 |
|
|
[考研] 0703化學(xué) 學(xué)碩 理工科均可 不區(qū)分研究方向 總分279求調(diào)劑 +7 | 1一11 2026-03-03 | 7/350 |
|
|
[考研] 0856材料專碩274能調(diào)劑去哪里? +3 | 22735 2026-03-04 | 4/200 |
|
|
[考博] 26申博 +5 | north, 2026-02-28 | 5/250 |
|
|
[考研] 主題 +3 | realstar2006 2026-02-27 | 3/150 |
|
|
[考研] 085700資環(huán)求調(diào)劑,初始279,六級(jí)已過,英語能力強(qiáng) +3 | 085700資環(huán)調(diào)劑 2026-03-03 | 4/200 |
|
|
[考研] 一志愿中科大能動(dòng)297求調(diào)劑,本科川大 +3 | 邵11 2026-03-03 | 3/150 |
|
|
[考研]
|
glwshine 2026-03-02 | 5/250 |
|
|
[考研] 284求調(diào)劑 +6 | 天下熯 2026-03-02 | 6/300 |
|
|
[考研] 307求調(diào)劑 +6 | wyyyqx 2026-03-01 | 6/300 |
|
|
[基金申請(qǐng)] 此成果不能導(dǎo)入原因:元數(shù)據(jù)必填信息不完整,可 進(jìn)行補(bǔ)充。 +4 | Kittylucky 2026-03-02 | 5/250 |
|
|
[考研] 275求調(diào)劑 +3 | L-xin? 2026-03-01 | 6/300 |
|