| 1 | 1/1 | 返回列表 |
| 查看: 847 | 回復(fù): 0 | |||
| 【懸賞金幣】回答本帖問(wèn)題,作者fs3364將贈(zèng)送您 35 個(gè)金幣 | |||
fs3364新蟲 (初入文壇)
|
[求助]
fluent蒸發(fā)冷凝傳輸問(wèn)題
|
||
|
做熱管仿真,想記錄熱管啟動(dòng)過(guò)程中蒸發(fā)冷凝傳輸質(zhì)量,使用的mass_transfer宏定義的相變過(guò)程,在其中用UDM2 和UDM3 記錄了蒸發(fā)量和冷凝量,然后在另外一個(gè)宏中報(bào)告出來(lái),同時(shí)在fluent中,用內(nèi)置的報(bào)告也報(bào)告了UDM2 和UDM3的值,發(fā)現(xiàn)程序報(bào)告是沒(méi)有蒸發(fā)質(zhì)量,只有冷凝質(zhì)量,而fluent自己算的是有蒸發(fā)質(zhì)量,沒(méi)有冷凝質(zhì)量,不知道是哪里的問(wèn)題,希望能幫忙看下,代碼如下 #include "udf.h" DEFINE_MASS_TRANSFER(liq_gas_source, cell, thread, from_index, from_species_index, to_index, to_species_index) { real m_lg = 0.0; real T_SAT = 373; real p = 0.0; Thread *gas, *liq; gas = THREAD_SUB_THREAD(thread, from_index); liq = THREAD_SUB_THREAD(thread, to_index); if (C_T(cell, liq) > T_SAT) { m_lg = -0.1*C_VOF(cell,liq)*C_R(cell,liq)*(C_T(cell, liq) - T_SAT) / T_SAT; C_UDMI(cell, thread, 2) = m_lg; } else if (C_T(cell, gas) < T_SAT) { m_lg = 0.1*C_VOF(cell,gas)*C_R(cell,gas)*(T_SAT - C_T(cell, gas)) / T_SAT; C_UDMI(cell, thread, 3) = m_lg; } return (m_lg); } DEFINE_EXECUTE_AT_END(time_step_update) { real zf,ln; #if !RP_HOST Domain *domain; Thread *thread; cell_t cell; domain = Get_Domain(1); #endif #if !RP_HOST thread_loop_c(thread, domain) { begin_c_loop(cell, thread) { zf = C_UDMI(cell, thread, 2); ln = C_UDMI(cell, thread, 3); } end_c_loop(cell, thread); } #endif #if RP_NODE zf = PRF_GRSUM1(zf); ln = PRF_GRSUM1(ln); #endif node_to_host_real_2( zf, ln); #if !RP_NODE Message("zf is : %g\n", zf); Message("ln is : %g\n", ln); #endif }@wuming524 |
| 1 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|