|
楼主 |
发表于 2006-5-26 17:09:05
|
显示全部楼层
[求助]DEFINE_SOURCE动量源项改错,高手看过来啊!!!
不好意思啊,由于刚学编程,有很多错误,大家看看下面这个,是否能实现源项在z方向和x方向的运动呢?
动量源项
z方向
#include "udf.h"
#define CON 20.0
DEFINE_SOURCE(source_z,cell,thread,dS,equ)
{
real source,z,x[ND_ND];
real vel_z_positive=0.2,vel_z_negative=-0.2;
real t=RP_Get_Real("flow-time");
C_CENTROID(x,f,thread);
z=x[2];
if(t>0&&<=10)
{
z=vel_z_positive*t;
source=CON*z;
dS[equ]=0;
}
else(t>15&&t<=25)
{
z=vel_z_negative*(25-t);
source=CON*vel_z_negative;
dS[equ]=0;
}
else
{
source=0;
dS[equ]=0;
}
return source;
}
x方向
#include "udf.h"
#define CON 20.0
DEFINE_SOURCE(source_x,cell,thread,dS,equ)
{
real sourcez,r[ND_ND];;
real vel_x=0.1;
real t=RP_Get_Real("flow-time");
C_CENTROID(r,f,thread);
x=r[0];
if(t>10&&t<=15)
{
x=vel_x*fabs(10-t);
source=CON*x;
dS[equ]=0;
}
else
{
source=0;
dS[equ]=0;
}
return source;
}
|
|