24小时热门版块排行榜

返回列表

sltwk

铁虫 (小有名气)

应助: 0 (幼儿园)
金币: 185.8
红花: 1
帖子: 53
在线: 36.6小时
虫号: 2670058
注册: 2013-09-21
性别: GG
专业: 工程热物理相关交叉领域

[求助] udf错误已有1人参与

解释时，显示第5行错误？？？ line 5: parse error
#include"udf.h"
#define T_SAT    /*定义饱和温度*/
#define lam 10 /*定义松弛因子*/
#define LAT_H    /*定义气液相变潜热*/
DEFIEN_PROPERTY(density-tem,c,t)
{
      real density;
      density=150.99277+7.54409*C_T(c,t)-0.02122*pow(C_T(c,t),2)+1.8226*e-5*pow(C_T(c,t),3); /*物性参数随温度变化*/
      return density;
}
DEFINE_SOURCE(lv,cell,first,ds,eqn)
{
   THREAD *mixer,*second;
   real smlv;
   mixer=THREAD_SUPER_THREAD(first);
   second=THREAD_SUB_THREAD(mixer,1);
   if((C_T(cell,mixer)>=T_SAT)
{
      smlv=(lam*C_VOF(cell,first)*C_R(cell,first)*(C_T(cell,first)-T_SAT)/T_SAT;
      ds[eqn]=lam*C_VOF(cell,first)*(C_T(cell,first)-T_SAT)/T_SAT;

}
   else if((C_T(cell,mixer)<T_SAT)
{
      smlv=0;
      ds[eqn]=0;}
      return smlv;
}
DEFINE_SOURCE(vl,cell,second,ds,eqn)
{
   Thread *mixer,*first;
   real smvl;
   mixer=THREAD_SUPER_THREAD(second);
   first=THREAD_SUB_THREAD(mixer,0);
   if((C_T(cell,mixer)<=T_SAT)
{
      smvl=lam*C_VOF(cell,first)*C_R(cell,first)*(T_SAT-C_T(cell,mixer))/T_SAT;
      ds[eqn]=lam*C_VOF(cell,first)*(T_SAT-C_T(cell,mixer))/T_SAT;
   else if((C_T(cell,mixer)>T_SAT)
      smvl=0;
      ds[eqn]=0;
               }
      return smvl;
}
DEFINE_SOURCE(enrg_src,cell,mixer,ds,eqn)
{
Therad *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)*(C_T(cell,first)-T_SAT)/T_SAT;
      ds[eqn]=lam*C_VOF(cell,first)*(C_T(cell,first)-T_SAT)/T_SAT;
  }
   else if((C_T(cell,mixer)<=T_SAT)
   m_dot=lam*C_VOF(cell,first)*C_R(cell,first)*(T_SAT-C_T(cell,mixer))/T_SAT;
   ds[eqn]=lam*C_VOF(cell,first)*(T_SAT-C_T(cell,mixer))/T_SAT;}
   return LAT_HT*m_dot;
}

回复此楼