24小时热门版块排行榜    

查看: 2793  |  回复: 14
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

清丶风灬孤

金虫 (初入文坛)

[求助] fluent udf三维力源项问题求助 已有1人参与

采用由于使用的是二维模型,进行旋转模拟三维流动,分析出受力形式,并表达成柱坐标的方式,因此需要对三方向源项进行加载,新人第一次弄这个,求大神指点
#include"udf.h"
#include"math.h"
#define SINB  0.707              /*  叶片安装角度,45°是为0.707;30°时为0.5;60°时为0.866; */
#define COSB  0.707              /*  叶片安装角度,45°是为0.707;30°时为0.866;60°时为0.5; */

double value()
{
        double m;
        if(C_U(c,t)==0)
                {
                        if(C_V(c,t)>0)
                                {
                                        m=1.57;  
                                }
               
                        if(C_U(c,t)<0)
                                {
                                        m=-1.57;   
                                }

        else
                {
                        m=atan(C_V(c,t)/C_U(c,t)) ;
                }
        return m;
}
DEFINE_SOURCE(xmom_source,c,t,dS,eqn)
{
  real  source;
  source = -68.38+68.38*COSB;
  return source;
}
DEFINE_SOURCE(swirl_mom_source,c,t,dS,eqn)
{
  real  source;
  source =value()-1.57;
  return source;
}
DEFINE_SOURCE(radial_mom_source,c,t,dS,eqn)
{
  real  source;
  source =68.38*SINB;
  return source;
}


现在无法导入,伤心啊
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

清丶风灬孤

金虫 (初入文坛)

引用回帖:
2楼: Originally posted by 死天 at 2014-11-21 13:24:32
double value()和source =value()-1.57;有这么写的吗?

改成

real value(cell_t c, Thread *t)

里面是real m

source =value(c,t,)-1.57;

dS=0;

才是return

其实没看懂,按你的改一下,还是有错误,能否详细帮忙指点一下,先谢谢了
3楼2014-11-21 14:09:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 15 个回答

死天

专家顾问 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
double value()和source =value()-1.57;有这么写的吗?

改成

real value(cell_t c, Thread *t)

里面是real m

source =value(c,t,)-1.57;

dS[eqn]=0;

才是return
2楼2014-11-21 13:24:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

死天

专家顾问 (著名写手)

引用回帖:
3楼: Originally posted by 清丶风灬孤 at 2014-11-21 14:09:17
其实没看懂,按你的改一下,还是有错误,能否详细帮忙指点一下,先谢谢了...

你把你改的发上来
4楼2014-11-21 14:24:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

清丶风灬孤

金虫 (初入文坛)

引用回帖:
4楼: Originally posted by 死天 at 2014-11-21 14:24:00
你把你改的发上来...

对编程一窍不通。。。。

#include"udf.h"
#include"math.h"
#define SINB  0.707              /*  叶片安装角度,45°是为0.707;30°时为0.5;60°时为0.866; */
#define COSB  0.707              /*  叶片安装角度,45°是为0.707;30°时为0.866;60°时为0.5; */

real value(cell_t c, Thread *t)
{
        real m;
        if(C_U(c,t)==0)
                {
                        if(C_V(c,t)>0)
                                {
                                        m=1.57;  
                                }
               
                        if(C_U(c,t)<0)
                                {
                                        m=-1.57;   
                                }

        else
                {
                        m=atan(C_V(c,t)/C_U(c,t)) ;
                }
        return m;
}
DEFINE_SOURCE(xmom_source,c,t,dS,eqn)
{
  real  source;
  source = -68.38+68.38*COSB;
  return source;
}
DEFINE_SOURCE(swirl_mom_source,c,t,dS,eqn)
{
  real  source;
  source =value(c,t,)-1.57;
  dS[eqn]=0;
  return source;
}
DEFINE_SOURCE(radial_mom_source,c,t,dS,eqn)
{
  real  source;
  source =68.38*SINB;
  return source;
}
5楼2014-11-21 14:43:27
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 hKe7U1kad5Sg 2026-10-31 7/350 2026-11-02 00:34 by xzcv0Tehd8lQ
[公派出国] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 xvJS1BYDxvBS 2026-10-31 6/300 2026-11-02 00:29 by xzcv0Tehd8lQ
[考研] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 xvJS1BYDxvBS 2026-10-31 11/550 2026-11-02 00:21 by xzcv0Tehd8lQ
[找工作] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 1uaZt2kAZj2S 2026-10-31 8/400 2026-11-02 00:15 by xzcv0Tehd8lQ
[基金申请] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +4 1uaZt2kAZj2S 2026-10-30 15/750 2026-11-02 00:08 by xzcv0Tehd8lQ
[考研] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 1uaZt2kAZj2S 2026-10-30 14/700 2026-11-02 00:08 by xzcv0Tehd8lQ
[硕博家园] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +4 1uaZt2kAZj2S 2026-10-30 15/750 2026-11-01 23:58 by xzcv0Tehd8lQ
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +6 X5bHxOULxFqb 2026-10-30 15/750 2026-11-01 23:45 by xzcv0Tehd8lQ
[找工作] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +3 hKe7U1kad5Sg 2026-10-31 5/250 2026-11-01 22:27 by xzcv0Tehd8lQ
[找工作] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 1uaZt2kAZj2S 2026-10-30 11/550 2026-11-01 21:35 by xzcv0Tehd8lQ
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +5 1uaZt2kAZj2S 2026-10-30 17/850 2026-11-01 21:26 by xzcv0Tehd8lQ
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 1uaZt2kAZj2S 2026-10-30 15/750 2026-11-01 16:52 by BCdvBAEpt3zm
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 1uaZt2kAZj2S 2026-10-30 13/650 2026-11-01 16:48 by BCdvBAEpt3zm
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +5 X5bHxOULxFqb 2026-10-30 22/1100 2026-11-01 16:35 by BCdvBAEpt3zm
[硕博家园] 越来越担心硕士毕业后没有竞争力了 +9 zuesli 2026-10-27 15/750 2026-11-01 12:59 by Equinoxhua
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 xvJS1BYDxvBS 2026-10-31 3/150 2026-11-01 12:53 by BCdvBAEpt3zm
[考研] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +4 1uaZt2kAZj2S 2026-10-31 8/400 2026-11-01 12:38 by BCdvBAEpt3zm
[硕博家园] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 1uaZt2kAZj2S 2026-10-30 17/850 2026-11-01 12:24 by BCdvBAEpt3zm
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +4 1uaZt2kAZj2S 2026-10-30 11/550 2026-11-01 12:24 by BCdvBAEpt3zm
[硕博家园] 申博自荐 2篇一区TOP+1篇EI+2公开发明专利 2027博士申请 +3 小小阿光 2026-10-27 3/150 2026-10-29 23:56 by 起风了的快乐
信息提示
请填处理意见