#include "udf.h"#define r 10#define T_SAT 348DEFINE_MASS_TRANSFER(liq_gas_source, cell, thread, from_index,from_species_index, to_index, to_species_index){ double m_lg; Thread *gas = THREAD_SUB_THREAD(thread, from_index); Thread *liq = THREAD_SUB_THREAD(thread, to_index); m_lg = 0.; if (C_T(cell, liq) >= T_SAT) { m_lg = -r*C_VOF(cell,liq)*C_R(cell,liq)*fabs(C_T(cell,liq)-T_SAT)/T_SAT; } if ((m_lg == 0. ) && (C_T(cell, gas) = T_SAT) { heat = -r*C_VOF(cell,liq)*C_R(cell,liq)*fabs(C_T(cell,liq)-T_SAT)/T_SAT*LH; } if ((heat == 0. ) && (C_T(cell, gas) mechanical engineering...
ادامه مطلبما را در سایت mechanical engineering دنبال می کنید
برچسب : نویسنده : mspahlavano بازدید : 74 تاريخ : جمعه 26 شهريور 1395 ساعت: 17:23