24小时热门版块排行榜    

查看: 2167  |  回复: 3

bobo1314

银虫 (小有名气)

[求助] udf的源宏如何调用内部面的温度 已有1人参与

对于fluent的udf,我想给内部面加热流,发现好像加不了,我就简化考虑加一个热源,但该热源的热流需要调用这个体热源的前后两个面的温度,想问问,如何实现?下面写的如何进行修正,本人小白,望指教
DEFINE_SOURCE(pvheatgen, c, t, dS, eqn)
{
        int ID1 = 1579;          /*热源体前表面的ID为1579*/
         int ID2=1576;       /*热源体后表面的ID为1576*/
        face_t f;
        Thread *T;
        Domain *domain = Get_Domain(1);
        T1 = Lookup_Thread(domain, ID1);
        T2 = Lookup_Thread(domain, ID2);
        double G = 1000;
        double Ta = 298.15;
        double tg = 0.95;
        double r = 0.004;
        double source = G*tg*(1 - 0.125*(1 - r*(T 1- T2))) / 0.0004;
        dS[eqn] = 0;
        return source;
}
回复此楼
一个矛盾无知的人
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

升级提示

新虫 (初入文坛)

【答案】应助回帖

F_T(f,t)命令可以读取面元的温度
比如:
#include "udf.h"
DEFINE_ADJUST(temperature,domain)
real tem;
face_t f;
Thread *t;
t=Lookup_Thread (domain, 40);  /*40为读取面的地址*/
begin_f_loop(f,t)  /*计算下一次风表面流过的总焓*/
{
tem=(tem+F_T(f,t))/2; }
end_f_loop(f,t);
}
2楼2018-05-25 13:45:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

木风10086

新虫 (小有名气)

引用回帖:
2楼: Originally posted by 升级提示 at 2018-05-25 13:45:24
F_T(f,t)命令可以读取面元的温度
比如:
#include "udf.h"
DEFINE_ADJUST(temperature,domain)
real tem;
face_t f;
Thread *t;
t=Lookup_Thread (domain, 40);  /*40为读取面的地址*/
b ...

Thread *t;
心情不爽!
3楼2020-10-26 01:04:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

木风10086

新虫 (小有名气)

引用回帖:
2楼: Originally posted by 升级提示 at 2018-05-25 13:45:24
F_T(f,t)命令可以读取面元的温度
比如:
#include "udf.h"
DEFINE_ADJUST(temperature,domain)
real tem;
face_t f;
Thread *t;
t=Lookup_Thread (domain, 40);  /*40为读取面的地址*/
b ...

这个F_T(f,t)是整个面的温度吧?能不能获得某个单元内与这个面重合的那条边(三维是面)的温度?
心情不爽!
4楼2020-10-29 09:59:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 bobo1314 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 明天E口面上会评 +4 布布和一二 2026-07-12 5/250 2026-07-13 10:44 by zzybjr
[公派出国] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 obzynn3tuv 2026-07-11 4/200 2026-07-13 10:35 by emlgkvoijw
[考博] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 obzynn3tuv 2026-07-11 4/200 2026-07-13 10:25 by emlgkvoijw
[论文投稿] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 obzynn3tuv 2026-07-11 4/200 2026-07-13 10:15 by emlgkvoijw
[硕博家园] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 obzynn3tuv 2026-07-11 3/150 2026-07-13 09:56 by emlgkvoijw
[硕博家园] 大龄残疾硕士的一点执念 +17 3776737374 2026-07-06 27/1350 2026-07-13 06:05 by 鲁弥abc
[考博] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 obzynn3tuv 2026-07-11 4/200 2026-07-13 00:24 by v2i90kmrcu
[考研] 售T0P一区SCI文章,我:8O5.51.O.54,科目齐全,可+急 +3 obzynn3tuv 2026-07-11 4/200 2026-07-13 00:15 by v2i90kmrcu
[基金申请] 不要再数国自然申请书的 filecode 的分隔符个数了 +10 sadpencil 2026-07-12 15/750 2026-07-12 21:50 by sadpencil
[基金申请] 祈祷青基必中 50+6 hadengry 2026-07-09 16/800 2026-07-12 20:31 by 登山虫虫
[基金申请] 生命口会评 +11 wuke100666 2026-07-07 12/600 2026-07-11 19:30 by hhs666
[考博] 27届辽宁大学应届毕业生申博 +3 可乐微风大海 2026-07-09 3/150 2026-07-10 21:23 by 贪玩的研究僧
[基金申请] 关于如何从代码看上不上会 +17 且听虎啸 2026-07-09 23/1150 2026-07-10 19:51 by sdfapple719
[基金申请] b口会评 +6 当空照 2026-07-08 6/300 2026-07-09 20:49 by tonyliu0401
[基金申请] 信息学部会评时间 +3 xuel2011 2026-07-06 3/150 2026-07-09 19:05 by mollyzhang_2003
[考研] 在职考研 +6 wu5d 2026-07-08 7/350 2026-07-09 16:40 by 化工小霸王呀
[论文投稿] MSER送审了还被拒稿 +3 S778950906 2026-07-08 5/250 2026-07-09 15:46 by S778950906
[有机交流] 硝基还原 20+3 暮年飞雪 2026-07-07 5/250 2026-07-09 13:30 by tfang
[基金申请] 化学口会评?应用基础研究和基础研究,希望能分开 +3 Tide man 2026-07-08 3/150 2026-07-09 11:36 by dede5556
[有机交流] Suzuki偶联中硼酸酯原料掉下的硼酸酯是否可以自身偶联,生成B2Pin2杂质 500+3 天下大同 2026-07-06 3/150 2026-07-07 10:31 by martyr_oyx
信息提示
请填处理意见