应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » ANSYS & ABAQUS » 毕业好难
152/2返回列表上一页12
查看: 3839  |  回复: 14
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

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 的主题更新
152/2返回列表上一页12
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 0703化学调剂，求各位老师收留 +5 秋有木北 2026-03-14 5/250 2026-03-14 09:50 by 30660438
[考研] 一志愿中国石油大学（华东） 本科 齐鲁工业大学 +3 石能伟 2026-03-07 3/150 2026-03-14 05:16 by JourneyLucky
[考研] 269求调剂 +4 朔朔话 2026-03-08 5/250 2026-03-14 04:43 by JourneyLucky
[考研] 化学工程321分求调剂（南京工业，浙江工业） +3 大米饭！ 2026-03-09 4/200 2026-03-14 02:34 by JourneyLucky
[考研] 085600求调剂 +3 a邵星池 2026-03-09 3/150 2026-03-14 01:32 by JourneyLucky
[考研] 一志愿湖师大化学289求调剂 +6 XMCMM3.14159 2026-03-10 6/300 2026-03-14 00:28 by JourneyLucky
[考研] 材料与化工（0856）304求B区调剂 +6 邱gl 2026-03-12 7/350 2026-03-13 23:24 by 邱gl
[考研] 085600材料与化工 求调剂 +7 enenenhui 2026-03-13 8/400 2026-03-13 22:19 by 星空星月
[考研] 工科，求调剂 +3 我887 2026-03-11 3/150 2026-03-13 21:39 by JourneyLucky
[考研] 315求调剂 +9 小羊小羊_ 2026-03-11 10/500 2026-03-13 21:13 by SXNU李老师
[考研] 26调剂/材料科学与工程/总分295/求收留 +9 2026调剂侠 2026-03-12 9/450 2026-03-13 20:46 by 18595523086
[考研] 283求调剂 +4 小楼。 2026-03-12 7/350 2026-03-13 15:30 by JourneyLucky
[考研] 土木第一志愿276求调剂，科研和技能十分丰富，求新兴方向的导师收留 +3 土木小天才 2026-03-12 3/150 2026-03-13 15:01 by JourneyLucky
[考研] 工科0856专硕化学工程269能调剂吗 +10 我想读研11 2026-03-10 10/500 2026-03-13 10:14 by Yuyi.
[考博] 26读博 +4 Rui135246 2026-03-12 10/500 2026-03-13 07:15 by gaobiao
[考研] 纺织、生物、化学、材料相关专业招生了 +4 耶耶业 2026-03-09 7/350 2026-03-12 19:05 by Equinoxhua
[考研] 0857 资源与环境 285分 +6 未名考生 2026-03-09 6/300 2026-03-11 21:08 by 30660438
[考研] 大连大学化学专业研究生调剂 +3 琪久. 2026-03-10 8/400 2026-03-11 10:02 by 琪久.
[考研] 材料工程307，求调剂 +7 我要燃烧你的梦 2026-03-08 7/350 2026-03-11 09:09 by 剑诗杜康
[考研] 调剂 +3 13853210211 2026-03-08 3/150 2026-03-08 19:34 by ms629
信息提示
关闭
请填处理意见
关闭