24小时热门版块排行榜    

查看: 4052  |  回复: 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的回帖

030301029

捐助贵宾 (正式写手)

【答案】应助回帖


臭水沟: 金币+1, 谢谢交流~~ 2012-05-22 12:01:03
引用回帖:
5楼: Originally posted by kylafree at 2012-05-18 09:29:55:
DEFINE_SOURCE(gas1, c, t, dS, eqn)宏,你后面不是漏了个 ds=***吗

ds[eqn]=***
source里面,这个不一定需要。其目的是加快计算速度。
8楼2012-05-22 09:22:44
已阅   回复此楼   关注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一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 wsYGJnURYvm6 2026-08-31 3/150 2026-09-01 01:40 by o3EMxHUAQDtS
[考博] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 EZ67DG6CvcKL 2026-08-31 4/200 2026-09-01 01:30 by o3EMxHUAQDtS
[基金申请] 国社科又开始会评了,不知道这次命运如何 +7 雨打竹帘 2026-08-30 11/550 2026-08-31 23:16 by hittle2008
[基金申请] 哪位高人中了,把查询到的截图贴出来让我看看,让我长长见识 +6 yuleib84 2026-08-26 7/350 2026-08-31 19:46 by 鱼翔浅底1
[基金申请] 29号明天会评吗 +4 笨笨唐 2026-08-28 4/200 2026-08-31 09:30 by huixian257
[基金申请] 基金不中,共勉 +12 eulota 2026-08-26 12/600 2026-08-31 08:42 by ZJTJZ
[基金申请] 为什么到现在没收到通知? +5 tannykie 2026-08-29 5/250 2026-08-30 21:05 by purplejack
[基金申请] 我就是申请一个面上项目而已,这评审意见是按照杰青的条件评的吧? +6 gouxfjh 2026-08-28 11/550 2026-08-30 07:57 by gouxfjh
[基金申请] 国自然评审意见 +13 wangmingqi 2026-08-28 19/950 2026-08-29 10:22 by Poppy1104
[基金申请] 2026年叶企孙基金 +4 bud_bud 2026-08-27 7/350 2026-08-29 07:23 by foolishmani
[基金申请] 系统查不到 +11 董八千 2026-08-26 11/550 2026-08-28 18:06 by Leogzhya
[基金申请] 怎么查啊 +6 huang1991js 2026-08-26 6/300 2026-08-28 08:42 by winsaint
[基金申请] 为什么 国际(地区)合作与交流项目 没有放榜? 10+3 majunge000 2026-08-26 11/550 2026-08-27 08:42 by 北京莱茵编辑
[基金申请] 出来了 +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by 宝贝虫子
[基金申请] 国际合作可查了,中了面上 (EPI+1)(金币+50) +18 Ldrop2023 2026-08-26 18/900 2026-08-26 11:15 by cmrandy
[基金申请] 系统进不去 +4 yanglien 2026-08-26 5/250 2026-08-26 11:10 by wenfengw83
[基金申请] 今天务委会开完了,明天出结果吗 +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
[基金申请] 在坚冰还盖着北海的时候,我看到了怒放的梅花。 (金币+10) +6 ziyangfang 2026-08-25 9/450 2026-08-25 20:26 by huagongfeihu
[基金申请] 某些机构,以效率低为荣,以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
信息提示
请填处理意见