找回密码
 注册
查看: 2063|回复: 3

非边界区域 外加速度的udf

[复制链接]
发表于 2006-4-18 22:08:15 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

x
试图在区域1、2、3分别加入速度方程 Vx=C1*X 、  Vx=C2*X 、 Vx=C3*X  


我写的好像有问题, 算出来和不外加速度方程结果一样
 楼主| 发表于 2006-4-18 22:15:11 | 显示全部楼层

非边界区域 外加速度的udf

#include "udf.h"
#define CON100.0
DEFINE_SOURCE(cell_x_source, cell,thread,dS,eqn)
{
real x[2];
real source;

if(x[1]>=0.35&&x[1]<=0.55)
{C_U(cell,thread)=0.0926*4*65.35*x[0]; source=CON*C_U(cell,thread);dS[eqn]=CON;}
else if(x[1]>0.25&&x[1]<0.35)
{C_U(cell,thread)=0.0569*4*65.35*x[0];source=CON*C_U(cell,thread);dS[eqn]=CON;}
else if(x[1]>0.55&&x[1]<0.65)
{C_U(cell,thread)=0.0145*4*65.35*x[0];source=CON*C_U(cell,thread);dS[eqn]=CON;}
return source;
}
 楼主| 发表于 2006-4-18 22:21:18 | 显示全部楼层

非边界区域 外加速度的udf

望高手指点
发表于 2011-1-22 14:57:38 | 显示全部楼层
这udf最起码也得对空间坐标赋值才行啊,
没有赋值的向量一点意义都没有,都是随机数,
#include "udf.h"
#define CON 100.0
DEFINE_SOURCE(cell_x_source, cell,thread,dS,eqn)
{
        real x[ND_ND];  此处虽然定义了,空间坐标变量,但是后面一直未赋值,
        real source;
                      *****************         此处应用某相关宏获取当前赋值区域的坐标
        if(x[1]>=0.35&&x[1]<=0.55)
        {
                C_U(cell,thread)=0.0926*4*65.35*x[0];
                source=CON*C_U(cell,thread);
                dS[eqn]=CON;
}
        else if(x[1]>0.25&&x[1]<0.35)
        {
                C_U(cell,thread)=0.0569*4*65.35*x[0];
                source=CON*C_U(cell,thread);
                dS[eqn]=CON;
}
        else if(x[1]>0.55&&x[1]<0.65)
        {
                C_U(cell,thread)=0.0145*4*65.35*x[0];
                source=CON*C_U(cell,thread);
                dS[eqn]=CON;
}
        return source;
}
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表