ÎÒ×öµÄƽ°åÁ÷¶¯»»ÈÈ£¬µÍÎÂÁ÷ÌåÁ÷¹ý¸ßΣ¨³¬¹ý·Ðµã£©Æ½°å£¬Ä£ÄâÆ½°åζȱ仯ÒÔ¼°Á÷ÌåÏà±ä£¬µ«ÊÇÄ£ÄâµÄÏà±äÓÐÆøÏ൫ÊÇÆøÅݲ»³¤´ó£¬²»ÖªÊÇÄÄÀï³öÎÊÌâÁË£¿
ƽ°å£¨ÓÐÒ»¶¨ºñ¶È£©Óиö³õΣ¨´óÓÚÒºÌå·Ðµã£©£¬»áËæ×ÅÁ÷ÌåÁ÷¹ý¶øÏ½µ£¬Á÷Ìå±»¼ÓÈÈ£¬³¬¹ý·Ðµã»áÆû»¯¡£³ÌÐòÈçÏ£º
# include "udf.h"
# include "sg_mphase.h"
# define T_SAT 373.15
# define lam 0.1
# define LAT 2250
DEFINE_PROPERTY(surface_tem,c,t)
{
real surface;
real temp=C_T(c,t);
surface=0.09537-2.24*(pow(10,-6))*temp-2.56*(pow(10,-7))*pow(temp,2);
return surface;
}
DEFINE_SOURCE(liq_src,cell,first,dS,eqn)
{
Thread *mixer,*second;
real m_dot_first;
mixer=THREAD_SUPER_THREAD(first);
second=THREAD_SUB_THREAD(mixer,1);
if(C_T(cell,mixer)>=T_SAT)
{
m_dot_first=-lam*C_VOF(cell,first)*C_R(cell,first)*fabs(C_T(cell,mixer)-T_SAT)/T_SAT;
dS[eqn]=-lam*C_R(cell,first)*fabs(C_T(cell,mixer)-T_SAT)/T_SAT;
}
else
{
m_dot_first=lam*C_VOF(cell,first)*C_R(cell,first)*fabs(C_T(cell,mixer)-T_SAT)/T_SAT;
dS[eqn]=0;
}
return m_dot_first;
}
DEFINE_SOURCE(vap_src,cell,second,dS,eqn)
{
Thread *mixer,*first;
real m_dot_second;
mixer=THREAD_SUPER_THREAD(second);
first=THREAD_SUB_THREAD(mixer,0);
if(C_T(cell,mixer)>=T_SAT)
{
m_dot_second=lam*C_VOF(cell,first)*C_R(cell,first)*fabs(C_T(cell,mixer)-T_SAT)/T_SAT;
dS[eqn]=0;
}
else
{
m_dot_second=-lam*C_VOF(cell,second)*C_R(cell,second)*fabs(C_T(cell,mixer)-T_SAT)/T_SAT;
dS[eqn]=-lam*C_R(cell,second)*fabs(C_T(cell,second)-T_SAT)/T_SAT;
}
return m_dot_second;
}
DEFINE_SOURCE(enrg_src,cell,mixer,dS,eqn)
{
Thread *first,*second;
real m_dot;
first=THREAD_SUB_THREAD(mixer,0);
second=THREAD_SUB_THREAD(mixer,1);
if(C_T(cell,mixer)>=T_SAT)
{
m_dot=-lam*C_VOF(cell,first)*C_R(cell,first)*fabs(C_T(cell,first)-T_SAT)/T_SAT;
dS[eqn]=-lam*C_VOF(cell,first)*C_R(cell,first)/T_SAT;
}
else
{
m_dot=lam*C_VOF(cell,second)*C_R(cell,second)*fabs(C_T(cell,mixer)-T_SAT)/T_SAT;
dS[eqn]=-lam*C_VOF(cell,second)*C_R(cell,second)/T_SAT;
}
return LAT*m_dot;
}
![fluentÏà±äÄ£Ä⣨Çó´óÉñÖ¸µã£©¼±Óã¬Ð»Ð»]()
ÎÞ±êÌâ.png |