24小时热门版块排行榜    

查看: 1158  |  回复: 1
【悬赏金币】回答本帖问题,作者tsv249052将赠送您 500 个金币

tsv249052

新虫 (著名写手)

[求助] 求助,UDS源项,一计算就发散是什么问题已有1人参与

求助,我自己编的udf程序,使用了define adjust和uds源项,在fluent中编译build和加载load都没有问题,但是计算一开始就显示uds-0发散了,不知道是什么原因,部分代码如下:
#include "udf.h"

#define PI 3.14159 /* 定义π*/
#define K 1.38e-23 /*定义玻尔兹曼常数 */
#define M 2.99e-26 /*定义水分子质量*/
#define R 461.5 /*定义水蒸气气体常数*/
#define f_v 0.4 /*相对湿度*/

real S1, G, J, pv1, ps1, T, P, sur_tension, density_c, density_v;/*不饱和度,吉布斯焓,成核率,水蒸气分压力,水蒸气饱和压力,温度,压力*/

/*计算成核率,液滴生长速度,临界半径*/
DEFINE_ADJUST(chenghelv, d)
{
        Thread *t;
        cell_t c;

        thread_loop_c (t,d)
        {
        begin_c_loop_all(c,t)
        {
        T = C_T(c,t);
        P = C_P(c,t);
        ps1 = -2.88934 + 0.37966 * T - 0.00925 * pow(T, 2) + 1.54e-4 * pow(T, 3);/*饱和压力拟合*/
        density_v = -0.00134 + 0.00136 * T - 3.27e-5 * pow(T, 2) + 7.76e-7 * pow(T, 3);/*蒸气密度拟合*/
        density_c = 1000.07904 + 0.01231 * T - 0.00586 * pow(T,2) + 1.6e-5 * pow(T,3);/*水密度拟合*/
        sur_tension = 0.07566 - 1.41e-4 * T - 2.68e-7 * pow(T,2);/*表面张力拟合*/
        S1 = P / ps1;
        pv1 = P * f_v;
        G = 16 / 3 * PI * pow((M / (density_c * log(S1) * K * T)),2) * pow(sur_tension, 3); /*计算吉布斯自由焓*/
        C_UDMI(c,t,0) = sqrt(2 / PI * sur_tension) * pow(M ,-3/2) * pow(density_v, 2) / density_c * exp( -G / K * T);/*成核率*/
        end_c_loop_all(c,t)
        }
                }
}

/*第一个输送方程Q0源项*/
DEFINE_SOURCE(q0_source,c,t,dS,eqn)
{
        return C_UDMI(c,t,0);
}

/*第二个输送方程Q1源项*/
DEFINE_SOURCE(q1_source,c,t,dS,eqn)
{
        return  C_UDMI(c,t,0) * pow(C_UDMI(c,t,2),2) + C_R(c,t) * C_UDSI(c,t,0) * C_UDMI(c,t,1);
}

/*第三个输送方程Q2源项*/
DEFINE_SOURCE(q2_source,c,t,dS,eqn)
{
        return  C_UDMI(c,t,0) * pow(C_UDMI(c,t,2),2) + 2 * C_R(c,t) * C_UDSI(c,t,1) * C_UDMI(c,t,1);
}

/*第四个输送方程g的源项*/
DEFINE_SOURCE(g_source,c,t,dS,eqn)
{
        return 4 * PI * density_c * (1/3 * C_UDMI(c,t,0) * pow(C_UDMI(c,t,2),3) + C_R(c,t) * C_UDSI(c,t,2) * C_UDMI(c,t,1));
}

/*能量方程源项*/
DEFINE_SOURCE(energy_source,c,t,dS,eqn)
{
        real dt, temp, L;
        dt = RP_Get_Real("physical-time-step";
        temp = C_T(c,t);
        L = 2502 - 2.42169 * temp;
        return L * C_UDSI(c,t,3) / dt;
}
回复此楼

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)

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

Diligent雨

新虫 (初入文坛)

【答案】应助回帖

把udf简化尝试,运用排除法试试;可能是fluent内部设置问题,查看与uds0所有的设置;减小松弛因子。希望有帮助
焊接fluent熔池
2楼2020-03-23 22:01:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 tsv249052 的主题更新
不应助 确定回帖应助 (注意:应助才可能被奖励,但不允许灌水,必须填写15个字符以上)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[教师之家] 饶议:什么制度能保障大学普通教师不用为领导拎包,不用看领导脸色 +6 zju2000 2024-06-12 9/450 2024-06-14 15:48 by chemhua
[博后之家] 山东大学(青岛)“天然药物生物智造”课题组 招聘“博士后”(年薪20.4-55.6万元) +3 第二种态度 2024-06-11 3/150 2024-06-14 15:44 by 金枫
[找工作] 杭电、天津科技、青农和宁波工程学院如何选? +6 味道很好啊 2024-06-13 6/300 2024-06-14 15:35 by lizhiweiouc
[教师之家] 能在两广找到什么工作呢 +9 yrliao12 2024-06-08 24/1200 2024-06-14 15:16 by kanyechris
[基金申请] 75批博后基金 +10 kyukitu 2024-06-13 13/650 2024-06-14 10:31 by kyukitu
[基金申请] 博士后基金需要结题吗? +7 zhouchuck 2024-06-13 7/350 2024-06-14 10:23 by zt0543
[基金申请] 为什么我的博后基金还在流动站审核中?不会是学院给我卡了吧? +10 王凯12 2024-06-13 21/1050 2024-06-14 10:04 by kyukitu
[论文投稿] 返修送审后第3天,只有原来的一个审稿人接受了审稿,其他两个有没有可能跑路? 60+5 huanpo116 2024-06-08 9/450 2024-06-14 10:01 by bobvan
[教师之家] 我们学院常年位居 各学院 倒数第二。专业撤销的话,在编者有什么补偿? +12 河西夜郎 2024-06-09 13/650 2024-06-14 09:27 by dhdhgfv
[硕博家园] 硕博巨婴,也许才刚刚开始 +22 SNaiL1995 2024-06-12 52/2600 2024-06-14 04:36 by SNaiL1995
[基金申请] 什么时候会评呢? +8 qq632458 2024-06-07 10/500 2024-06-14 00:58 by wangting_nju
[教师之家] 请各位老师谈谈身边非升即走的例子 +10 Lucas1121 2024-06-09 25/1250 2024-06-13 21:52 by Lucas1121
[有机交流] 旋蒸请教 +6 办公室摸鱼 2024-06-09 9/450 2024-06-13 21:31 by wuxiaominggo
[基金申请] 博士后面上项目状态还是专家评审吗 10+9 Thatcheremu 2024-06-13 55/2750 2024-06-13 21:23 by 乌合麒麟
[基金申请] 连续两年医学口青年项目初审体会 +11 进击的荣耀 2024-06-09 18/900 2024-06-13 17:27 by 进击的荣耀
[硕博家园] 迷茫的毕业季 +7 独孤老狗 2024-06-08 7/350 2024-06-12 19:13 by 投必得科研顾问
[硕博家园] 申博 +3 悦悦小小鱼 2024-06-12 3/150 2024-06-12 15:11 by chen5805
[硕博家园] 交友 +5 xkkl 2024-06-08 6/300 2024-06-12 14:47 by xkkl
[论文投稿] 计算机类,请问eswa与kbs哪个相对来说容易一些啊? +3 chenrui2015 2024-06-08 4/200 2024-06-11 13:37 by p-cloud
[论文投稿] water research状态咨询 5+3 Flyyawa 2024-06-10 6/300 2024-06-11 09:45 by bobvan
信息提示
请填处理意见