24小时热门版块排行榜    

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

buwangchuxin

新虫 (小有名气)

[求助] 好心人帮帮忙吧,为什么这个UDF导入fluent以后,在边界条件处没有显示~~~ 已有1人参与

这是一个关于膜渗透的过程,利用UDF进行质量源项的添加。具体的程序贴出来了,问题是导入fluent以后,DEFINE_ADJUST定义的宏表现出来了,可是DEFINE_SOURCE 定义的函数在边界条件那里没有,我在fluent中设定了memory是2个,其他的就没有再改,是不是漏掉什么了?大家帮我看看吧~~

#include"udf.h"
#include"mem.h"
#define MW_N2 28.0
#define MW_C2H4 28
#define Q_N2 0
#define Q_C2H4 0.0000002435
#define P_outer  2160000
#define P_inner  120000
#define feed_domain 17
#define perment_domain 18

real molefrac( real frac, real molarone, real molartwo)
{
        real a = frac / molarone ;
        real b = (1-frac)/molartwo ;
        return a/(a+b) ;
}
DEFINE_ADJUST(filter_adjust, domain)
{
        cell_t c1, c0;
        Thread*  wall_thread;
        Thread*  wall_shadow_thread ;
        Thread*  t0;
        Thread*t1;
        face_t wall = 27;
        face_t wall_shadow = 2;
        real A[ND_ND] ;
        real x_C2H4_outer, x_N2_outer, x_C2H4_inner, x_N2_inner, At, flux_C2H4,  flux_N2, tot_flux ;
        int  memb_id = 17 ;
        wall_thread= Lookup_Thread(domain,wall);
         tot_flux = 0 ;
        begin_f_loop (wall, wall_thread)
        {
                c0  = F_C0(wall,wall_thread);
                wall_shadow_thread = THREAD_SHADOW(wall_thread);
                wall_shadow = F_SHADOW(wall,wall_thread);
                c1 = F_C0(wall_shadow,wall_shadow_thread);
                t0 = F_C0_THREAD(wall,wall_thread);
                t1 =THREAD_T0(wall_shadow_thread);
                x_C2H4_outer = molefrac(C_YI(c0, t0, 0), MW_C2H4, MW_N2);
                x_N2_outer = 1.0 - x_C2H4_outer;
                 x_C2H4_inner = molefrac(C_YI(c1, t1, 0), MW_C2H4, MW_N2);
                 x_N2_inner = 1.0 - x_C2H4_inner;
                F_AREA(A,wall, wall_thread);
                 At = NV_MAG(A);
                 flux_C2H4 = Q_C2H4 * ( x_C2H4_outer * P_outer - x_C2H4_inner * P_inner);
                 flux_N2 = Q_N2 * ( x_N2_outer * P_outer - x_N2_inner * P_inner);
                  tot_flux = tot_flux + MW_C2H4*flux_C2H4*At + MW_N2*flux_N2*At;
                C_UDMI(c0, t0, 0) = -(MW_C2H4*flux_C2H4)*At/C_VOLUME(c0,t0);
                C_UDMI(c1, t1, 1) =  (MW_C2H4*flux_C2H4)*At/C_VOLUME(c1,t1);
                C_UDMI(c0, t0, 2) = -(MW_N2*flux_N2)*At/C_VOLUME(c0,t0);
                C_UDMI(c1, t1, 3) =  (MW_N2*flux_N2)*At/C_VOLUME(c1,t1);
        }
        end_f_loop (wall,wall_thread)
}
DEFINE_SOURCE(gas1, c, t, dS, eqn)
{  
        Thread*  tf;
        int n ;
        real source=0.0;
        Domain *domain = Get_Domain(feed_domain);
        face_t wall = 27;
        Thread* wall_thread=Lookup_Thread(domain,wall);
        Thread* wall_shadow_thread = THREAD_SHADOW(wall_thread);
        c_face_loop( c, t, n)  
        {tf = C_FACE_THREAD(c,t,n);
                if(tf==wall_thread)
                        return source=C_UDMI(c, t, 0);       
        }
        return source;
}
DEFINE_SOURCE(gas2, c, t, dS, eqn)
{  
        Thread*  tf;
        int n ;
        real source=0.0;
        Domain *domain = Get_Domain(perment_domain);
        face_t wall = 27;
        Thread* wall_thread=Lookup_Thread(domain,wall);
        Thread* wall_shadow_thread = THREAD_SHADOW(wall_thread);
        c_face_loop( c, t, n)  
        {tf = C_FACE_THREAD(c,t,n);
                if(tf==wall_shadow_thread)
                        return source=C_UDMI(c,t,1);
        }
        return source;
}
有点长,可是很简单。求求大家帮我看看吧
回复此楼

» 猜你喜欢

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

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

gyctju

金虫 (著名写手)

【答案】应助回帖

★ ★ ★ ★
感谢参与,应助指数 +1
xiegangmai: 金币+1, 谢谢应助! 2012-05-18 22:39:01
buwangchuxin: 金币+3, 多谢了 2012-05-21 19:29:45
lz的udf有很多不合理的地方,有些是语法上的逻辑问题,有些是计算效率问题。
6楼2012-05-18 10:28:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 18 个回答

buwangchuxin

新虫 (小有名气)

10个金币可能太少了,可现在是我基本上全部,大家帮帮那我吧~~~
2楼2012-05-18 01:37:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

47425804

木虫 (正式写手)



xiegangmai: 金币+1, 谢谢参与! 2012-05-18 22:38:35
SOURCE是源项宏,不是用来给边界条件的。
边界条件的宏是DEFINE_PROFILE。
3楼2012-05-18 07:10:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

47425804

木虫 (正式写手)



xiegangmai: 金币+1, 鼓励讨论交流! 2012-05-18 22:38:45
引用回帖:
3楼: Originally posted by 47425804 at 2012-05-18 07:10:00:
SOURCE是源项宏,不是用来给边界条件的。
边界条件的宏是DEFINE_PROFILE。

上面这条回复请无视,误解你的问题了,呵呵~~
你这儿是在一个膜两侧进行传质,我以前也写过一个类似问题的UDF,发在论坛上了。思路和你的不大一样,你也可以参考一下。
你的UDF,考虑下两个Domain给的是不是有问题,feed_domain和perment_domain,分别是17和18,就我的理解似乎不对。
4楼2012-05-18 07:28:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +3 wsYGJnURYvm6 2026-08-31 4/200 2026-09-01 06:38 by o3EMxHUAQDtS
[考博] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 EZ67DG6CvcKL 2026-08-31 5/250 2026-09-01 05:45 by o3EMxHUAQDtS
[基金申请] 怎么看青基中了没有啊 +6 叶九微 2026-08-26 6/300 2026-08-31 23:54 by yudaoqian88
[基金申请] 投票:  有多少人是今天查系统知道结果的? +17 爱看书的可乐 2026-08-26 19/950 2026-08-31 21:30 by xiangy672
[基金申请] 基金未中,这种答复是模板吗? +6 zhaosm1982 2026-08-27 7/350 2026-08-31 21:18 by qdxxmc
[基金申请] 面上意见出来了 +12 黄鸟于飞Chao 2026-08-29 23/1150 2026-08-31 18:57 by 黄鸟于飞Chao
[基金申请] 能否申诉? +7 echo8914667 2026-08-30 8/400 2026-08-31 17:00 by yihongxu
[基金申请] 有没有仍没收到信息的 +7 德尚中行 2026-08-27 8/400 2026-08-30 20:52 by purplejack
[考博] 找导师 +6 yuanjiabao 2026-08-29 7/350 2026-08-30 14:40 by 生科新手
[基金申请] 我就是申请一个面上项目而已,这评审意见是按照杰青的条件评的吧? +6 gouxfjh 2026-08-28 11/550 2026-08-30 07:57 by gouxfjh
[基金申请] 国自然面上复盘~欢迎讨论 (金币+15) +15 晴天加油 2026-08-26 16/800 2026-08-29 18:28 by symmetry
[基金申请] 系统查不到 +11 董八千 2026-08-26 11/550 2026-08-28 18:06 by Leogzhya
[基金申请] 我不理解! +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 2026年8月25日国自然放榜前突然收到列入评审专家邮件,有关系吗? +25 木水思豆 2026-08-25 28/1400 2026-08-26 14:53 by draco1987
[基金申请] 国合里面能看到了 +7 一怀馨秋 2026-08-26 7/350 2026-08-26 11:23 by zhaosm1982
[基金申请] 国际合作可查了,中了面上 (EPI+1)(金币+50) +18 Ldrop2023 2026-08-26 18/900 2026-08-26 11:15 by cmrandy
[基金申请] 项目信息和经费信息在系统里都可以看到了 +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[基金申请] 国合可查了 +3 paperzjh 2026-08-26 3/150 2026-08-26 10:41 by LemmonTr
[基金申请] 今天务委会开完了,明天出结果吗 +19 angus9576 2026-08-25 23/1150 2026-08-26 10:03 by zp519
[基金申请] 牛来!米来!面来! +8 beefly 2026-08-26 8/400 2026-08-26 08:37 by xuzhipiao
信息提示
请填处理意见