24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 3948  |  回复: 14

songxp03

木虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
你们导师负责任,我导师根本不管我,自己糊弄自己毕业。
Bird
11楼2019-03-02 19:10:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

liqijiecharp

新虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
真辛苦啊,不过在这个论坛上志同道合的人还是很多的
12楼2019-03-20 23:10:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

日月星空

铁虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
送红花一朵
做一个密相输运床煤气化的模拟,尝试用dpm模型耦合欧拉双流体模型来做,准备用udf定义颗粒我表面反应,对气固非均相反应进行描述。可是每当载入此udf,fluent就提示 the f1 process could not be started。不知道到底是哪里出了问题。麻烦大神们帮我看一下我的udf,麻烦指出是哪里出了错误,十分感谢!

#include "udf.h"
#include "dpm.h"

#define o2 1
#define h2o 3
#define co2 2
#define h2 5
#define co 4
#define ch4 6
#define tmax 2500

define_pr_rate(particle_surface_rate, c, t, r, mw, pp, p, sf, dif_i, cat_i, rr)
{
        double t_1 = max(450, c_t(c, t));/* 连续相温度 */
        double t_2 = max(450, p_t(p));
        double t = min(3000, t_1);
        double t_s = min(3000, t_2);

        double k_e_q, p_e;
       

        double k_f, k_a, k_r, diff;
    double pt = max(0.1, (op_pres+c_p(c,t))/101325);
        double rd;
        double d_p = p_diam(p);
        double ash_ar = 10.68;
        double ash;
        double conv;
        double ep_a, f_ep_a;
        ash = p_init_mass(p)*0.1068;
        /* 灰的空隙率,void fraction of ash layer */

                ep_a = 0.9199;/*0.25 + 0.75*(1-ash_ar/100.)*/
                f_ep_a = pow(ep_a, 2.5);
                conv = (p_mass(p)/ash)-1+(1.e-8);
                conv = max(0,conv);
        rd = pow(conv,(1./3.));
       
        if(!strcmp(r->name, "reaction-10") /* c+0.9o2=0.2co+0.8co2 */
        {
                if(sf[0]>0&&c_yi(c,t,1)>0)
        {
                diff = 0.584 * (4.26/t) * pow((t/1800.), 1.75) / pt;
        diff = max(diff, 1.e-10);
        k_f = diff / (d_p * 100 );
    k_r = 8710. * exp( -149400./(t * 8.314 )) * rd * rd;
                 if(rd >= 1.)
                 {
                         *rr = 1./(1./k_f + 1./k_r);
                 }
                 else
                 {
                        k_a = rd * k_f * f_ep_a / (1.0-rd) ;
                         *rr = ( 1.0/(1.0/k_f + 1.0/k_r + 1.0/k_a));
                 }
                }
                else
                {
                        *rr = 0.;
                }

                 *rr = -10 * (*rr * sf[0] * pp[1] * 3.14 * d_p * d_p / 101325.);
        }
        else if(!strcmp(r->name, "reaction-7") /* c+h2o=co+h2 */                                                                                                                                         
        {
                if(sf[0]>0&&c_yi(c,t,3)>0)
                {
                k_e_q = exp(17.644-30260/(1.8*t));
                p_e = pp[3] - ((pp[5]-pp[4])/k_e_q);
                p_e = max(p_e, 0);
                diff =0.001 * pow((t/2000.), 0.75) / pt;
                diff = max(diff, 1.e-10);
                 k_f = diff / (d_p * 100.);
                 k_r = 247. * exp( -175100./(8.314 * t)) * rd * rd;
                 if(rd >= 1.)
                 {
                         *rr = 1./(1./k_f + 1./k_r);
                 }
                 else
                 {
                        k_a = rd * k_f * f_ep_a / (1.-rd);
                         *rr = (( 1. / (1./k_f + 1./k_r + 1./k_a))+(1.e-8));
                 }
                }
                else
                {
                        *rr = 0.;
                }
                 *rr = -10 * (*rr * pp[3] * 3.14 * d_p * d_p * sf[0] / 101325.);  
        }
        else if(!strcmp(r->name, "reaction-8") /* c+co2=2co */
        {
        if(sf[0]>0.&&c_yi(c,t,2)>0.)
        {
        diff = (7.45e-4) * pow((t/2000.), 0.75) / pt;
        diff = max(diff, 1.e-10);
                 k_f = diff / (d_p * 100.);
                k_r = 247. * exp( -175100./(8.314 * t)) * rd * rd;
                 if(rd >= 1.)
                 {
                         *rr = 1./(1./k_f + 1./k_r);
                 }
                 else
                 {
                 k_a = rd * k_f * f_ep_a / (1.-rd) ;
                         *rr = ( 1. / (1./k_f + 1./k_r + 1./k_a))+(1.e-8);
                 }
        }
        else
        {
                *rr = 0.;
        }
                 *rr = - 10 * (*rr * pp[2] * 3.14 * d_p * d_p * sf[0] / 101325.);
        }
        else if(!strcmp(r->name, "reaction-9") /* c+h2=ch4 */
        {
                if(sf[0]>0.&&c_yi(c,t,5)>0.)
                {
                k_e_q = (5.041e-6) * exp(18400./(1.8 * t));
                p_e = (pp[5]/101325) - sqrt(pp[6] / k_e_q/101325);
                p_e = max(p_e, 0);
        diff = (1.33e-3) * pow((t/2000.), 0.75) / pt;
        diff = max(diff, 1.e-10);
                 k_f = diff / (d_p * 100.);
                 k_r = 0.12 * exp( -149000./(8.314 * t )) * rd * rd;
                 if(rd >= 1.)
                 {
                         *rr = 1./(1./k_f + 1./k_r);
                 }
                 else
                 {
                         k_a = rd * k_f * f_ep_a / (1.-rd) ;
                         *rr = ( 1. / (1./k_f + 1./k_r + 1./k_a));
                 }
                }
                else
                {
                        *rr = 0.;
                }
                *rr = -10 * (*rr * p_e * 3.14 * d_p * d_p * sf[0]);
                 
                 
        }
}
13楼2019-04-12 10:45:46
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yx0918yogurt

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
引用回帖:
13楼: Originally posted by 日月星空 at 2019-04-12 10:45:46
做一个密相输运床煤气化的模拟,尝试用dpm模型耦合欧拉双流体模型来做,准备用udf定义颗粒我表面反应,对气固非均相反应进行描述。可是每当载入此udf,fluent就提示 the f1 process could not be started。不知道到 ...

楼主请问你的问题解决了吗?我是用DPM模型来计算的,导入编译时遇到了相同的问题
14楼2019-12-18 16:56:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yx0918yogurt

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
引用回帖:
13楼: Originally posted by 日月星空 at 2019-04-12 10:45:46
做一个密相输运床煤气化的模拟,尝试用dpm模型耦合欧拉双流体模型来做,准备用udf定义颗粒我表面反应,对气固非均相反应进行描述。可是每当载入此udf,fluent就提示 the f1 process could not be started。不知道到 ...

您好,我也是做CFD煤气化方面工作的,主要是编程这一块,方便交流一下吗?
15楼2019-12-18 17:14:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 chixiufang 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 工科11408,314求调剂,有项目经验,了解transformer,能训练模型。 +3 缝曦1000 2026-04-04 3/150 2026-04-04 14:20 by 土木硕士招生
[考研] 292求调剂 +9 2022080213 2026-04-04 11/550 2026-04-04 12:17 by 2022080213
[考研] 265求调剂 +17 林深温澜 2026-04-01 20/1000 2026-04-04 01:09 by userper
[考研] 294求调剂 +6 Grey_Ey 2026-04-03 6/300 2026-04-03 20:46 by 欣喜777
[考研] 303求调剂 +10 DLkz1314. 2026-03-30 10/500 2026-04-03 18:03 by Jimmyandyou
[考研] 一志愿中国科学院大学265求调剂 +9 恬淡ye 2026-03-31 10/500 2026-04-03 11:10 by txp1986
[考研] 316求调剂 +14 舟自梗 2026-04-01 18/900 2026-04-03 10:28 by linyelide
[考研] 279求调剂 +6 qazplm0852 2026-04-02 6/300 2026-04-03 10:03 by 蓝云思雨
[考研] 重庆大学材料与化工085600,初试370+,求求调剂建议 +8 shzhou_ 2026-04-01 9/450 2026-04-03 09:31 by 蓝云思雨
[考研] 312 化工或制药调剂 +8 小小墨123 2026-04-02 9/450 2026-04-03 09:12 by zhouxiaoyu
[考研] 312求调剂 +4 赊月色 2026-04-02 5/250 2026-04-03 08:21 by fangshan711
[考研] 298求B区调剂 +4 zzz,,r 2026-04-02 5/250 2026-04-02 12:17 by 土木硕士招生
[考研] 279求调剂 +7 莫xiao 2026-04-01 7/350 2026-04-01 22:05 by 客尔美德
[考研] 0817化工学硕调剂 +11 努力上岸中! 2026-03-31 11/550 2026-04-01 20:30 by 赖春艳
[考研] 085600 一志愿9 总分351 求调剂学校 +7 czhcz 2026-03-31 9/450 2026-04-01 19:24 by 无际的草原
[考研] 调剂 +3 好好读书。 2026-04-01 3/150 2026-04-01 17:06 by zhouyuwinner
[考研] 一志愿北交材料工程总分358 +5 cs0106 2026-04-01 7/350 2026-04-01 11:45 by wangjy2002
[考研] 一志愿中海洋320化学工程与技术学硕求调剂 +8 披星河 2026-03-30 8/400 2026-03-31 08:53 by lbsjt
[考研] 福建理工大学材料学院先进合金团队招收考研调剂学生 +3 大华金商都 2026-03-30 4/200 2026-03-31 01:04 by 方英俊602
[考研] 求调剂 +10 家佳佳佳佳佳 2026-03-29 10/500 2026-03-30 18:34 by 544594351
信息提示
请填处理意见