24小时热门版块排行榜    

查看: 2760  |  回复: 6

lihongyang0

金虫 (初入文坛)

[交流] FLuent 空化 UDF能量源项

我写一个能量方程的源项,但是计算结果显示,我的源项加没加计算结果都一样,证明说这里面有地方写错了。但是我实在看不出来哪里弄错了。
我加载代码的方式应该是正确的吧(先iinterpreted,然后Cell zone, source前打勾,最后把能量UDF源选进去)
#include "udf.h"
#include "sg_mphase.h"

DEFINE_SOURCE(energy_source,c,m_t,dS,eqn)
{
        Thread *l_t, *v_t;       
        real m_dot, hc, source, fv, dT,m_dot2,source2;
        real cigma_m, cigma_m2,flag;
        real D_l, D_v,p_loc;
        real p_sat,p_sat2, T_loc, p_vapor,dp, dp2, T_loc2, p_vapor2;
        real p1, p2, p3, p4,m_dot_Re,m_dot_Re2,m_dot_Rc,m_dot_Rc2;
        real F_vap, F_cond, temp1, hc2;
        p_loc=C_P(c,m_t)*1000000;
        F_vap=0.02;
        F_cond=0.01;
        l_t=THREAD_SUB_THREAD(m_t,0);
        v_t=THREAD_SUB_THREAD(m_t,1);
        fv=C_VOF(c,v_t)*C_R(c,v_t)/(C_VOF(c,v_t)*C_R(c,v_t)+C_VOF(c,l_t)*C_R(c,l_t));

        T_loc=C_T(c,m_t);
        p1=10.86;
        p2=-1980;
        p3=1.233*100000;
        p4=-2.617*1000000;
        p_sat=p1*T_loc*T_loc*T_loc+p2*T_loc*T_loc+p3*T_loc+p4;
        dT=0.01;
        T_loc2=T_loc+dT;
        p_sat2=p1*T_loc2*T_loc2*T_loc2+p2*T_loc2*T_loc2+p3*T_loc2+p4;
        p_vapor=p_sat+0.5*0.39*C_R(c,m_t)*C_K(c,m_t);
        p_vapor2=p_sat2+0.5*0.39*C_R(c,m_t)*C_K(c,m_t);
        p1=3.424e-09;
        p2=-1.867e-07;
        p3= -0.0002614;
        p4=0.02863;
        cigma_m=p1*T_loc*T_loc*T_loc+p2*T_loc*T_loc+p3*T_loc+p4;
        cigma_m2=p1*T_loc2*T_loc2*T_loc2+p2*T_loc2*T_loc2+p3*T_loc2+p4;
        p1=-0.0002051;
        p2=0.03527;
        p3=-3.064;
        p4=320.1;
        hc=p1*T_loc*T_loc*T_loc+p2*T_loc*T_loc+p3*T_loc+p4;

        hc2=p1*T_loc2*T_loc2*T_loc2+p2*T_loc2*T_loc2+p3*T_loc2+p4;

        dp=p_vapor-p_loc;
        dp2=p_vapor2-p_loc;
        temp1=sqrt(C_K(c,m_t));
        D_l=C_R(c,l_t);
        D_v=C_R(c,v_t);
        m_dot_Re=0.0;
        m_dot_Rc=0.0;
        source=0.0;
        source2=0.0;
        flag=1000.0;
        if(p_loc<=p_vapor)           
        {

                m_dot_Re=F_vap*temp1/cigma_m*D_l*D_v*sqrt(2/3*dp/D_l)*(1-fv);

        }
        if(p_loc>p_vapor)                              
        {
                m_dot_Rc=F_cond*temp1/cigma_m*D_l*D_l*sqrt(2/3*(-dp)/D_l)*fv;
       
        }

        source=(m_dot_Re-m_dot_Rc)*hc*flag;
       
        dS[eqn]=0.0;
       
        return source;
}
回复此楼

» 收录本帖的淘帖专辑推荐

软件及其学习资料 fluent软件学习

» 猜你喜欢

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

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

qqww2320

铜虫 (小有名气)

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
小木虫: 金币+0.5, 给个红包,谢谢回帖
lihongyang0: 金币+10 2014-06-04 13:43:47
程序编写的没用问题,我也分别用VOF.MIXTURE和euler的方式测试过了,没用问题,温度都有明显提升,你自己在试试吧,哪操作有错误吧。我用的编译的方式,不是用的解释法。
2楼2014-06-04 11:10:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tjushang

捐助贵宾 (正式写手)

★ ★ ★ ★ ★ ★ ★ ★ ★
小木虫: 金币+0.5, 给个红包,谢谢回帖
lihongyang0: 金币+8 2014-06-05 09:34:42
温度没变化只说明一个问题,你的源项返回值太小了,在很短的时间内体现不出温度变化。试试把源项大小提高几个数量级看看。
王城的姓氏都改写 我还在这里守着夜 等什么从灰烬里面 破茧成蝶
3楼2014-06-05 09:17:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lihongyang0

金虫 (初入文坛)

引用回帖:
3楼: Originally posted by tjushang at 2014-06-05 09:17:45
温度没变化只说明一个问题,你的源项返回值太小了,在很短的时间内体现不出温度变化。试试把源项大小提高几个数量级看看。

提高了,是有效果的,但已经不是原物理问题了
4楼2014-06-05 09:34:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
5楼2014-06-06 20:32:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

独恋sophia

木虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
请问楼主这个Udf是实现空化中什么功能呢,我刚开始学习Udf,还不是很明白,望楼主不吝赐教哈

[ 发自手机版 http://muchong.com/3g ]
好好学习,天天向上
6楼2014-11-26 11:01:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bittonny

铁虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
你好,楼主,最后问题解决了吗
fortran、matlab、fluent、numeca
7楼2015-11-05 10:54:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 lihongyang0 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 投票:  有多少人是今天查系统知道结果的? +12 爱看书的可乐 2026-08-26 14/700 2026-08-26 11:49 by coolysnow
[基金申请] 科研孤儿太难了 +21 我4大白菜 2026-08-20 22/1100 2026-08-26 11:29 by nlgza
[基金申请] 国合里面能看到了 +7 一怀馨秋 2026-08-26 7/350 2026-08-26 11:23 by zhaosm1982
[基金申请] 能否退出参与的面上项目解除限项 +22 koalala 2026-08-24 25/1250 2026-08-26 11:14 by dxcharlary
[基金申请] 项目信息和经费信息在系统里都可以看到了 +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[基金申请] 出来了 +8 trojank 2026-08-26 8/400 2026-08-26 09:00 by gxc
[基金申请] 牛来!米来!面来! +8 beefly 2026-08-26 8/400 2026-08-26 08:37 by xuzhipiao
[基金申请] 范进中举一文的中心思想 +8 炎黄贵胄 2026-08-22 9/450 2026-08-26 07:47 by WASM
[基金申请] 在坚冰还盖着北海的时候,我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 放榜前的不淡定 20+4 snowwithsea 2026-08-19 19/950 2026-08-25 17:57 by chick875
[基金申请] 今日不放榜?网传国自然预计 8 月 27 日可查结果 +17 医学老男孩 2026-08-20 22/1100 2026-08-25 15:36 by 医学老男孩
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
[教师之家] 导师吐槽:我怎么摊上了这么个极品研究生! +3 苏东坡二世 2026-08-23 3/150 2026-08-25 10:35 by shisan1313
[基金申请] 我面上完蛋了 +13 且听虎啸 2026-08-20 14/700 2026-08-25 09:10 by mrkang
[基金申请] 只有每年这种时候来逛逛小木虫 +25 yaoyewhu2008 2026-08-20 27/1350 2026-08-25 08:01 by Equinoxhua
[基金申请] 让我中一个面上吧! +13 大萍1987 2026-08-20 16/800 2026-08-24 10:23 by 太傻了
[基金申请] 时间戳今天,20号变了 +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
[基金申请] 看来今天不会放榜了? +8 chengyan1220 2026-08-21 11/550 2026-08-21 17:52 by dcqxinyang
[基金申请] 应该是下周三26日公布了吧? +4 哈哈蛤? 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
信息提示
请填处理意见