fluent编译udf问题
悬赏金币:7 匿名提问 时间:2018-12-25 17:20
#include "udf.h"
#include "sg_mphase.h"
DEFINE_INIT(Tsat,domain)
{
cell_t c;
Thread *t;
t=Lookup_Thread(domain,ID_fluid);
begin_c_loop(c,t)
{
C_UDMI(c,t,10)=300;
}
end_c_loop(c,t)
}
DEFINE_SOURCE(dong, c, t, dS, eqn)
{
real xca[ND_ND],xcb[ND_ND];
real vol;
real xa,ya,xb,yb;
real Reff;
real dl;
C_CENTROID(xca,cn0,tn0);
xa=xca[0];
ya=xca[1];
C_CENTROID(xcb,cn1,tn1);
xb=xca[0];
yb=xca[1];
Reff=fabs((xa-xb)+(ya-yb))/2;
vol=C_VOF(c,t)*Reff;
dl=2*vol/Reff;
return dl;
}
回答(0)