24小时热门版块排行榜    

查看: 2671  |  回复: 8
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

皮皮考拉

新虫 (初入文坛)

[求助] udf初始化失败 已有3人参与

不知道是不是udf的问题,贴上来求大神帮忙看看


#include "udf.h"
#include "math.h"
#include "sg_udms.h"
#include "mem.h"

double EA=1.5e5;       /*Aktivierungsenergie*/
double k0=1.0e28;
double m=4.0;
const double pi=3.141593;
const double T=296.15;         /*Temperatue*/
const double Nav=6.02e23;     /*Avogadro*/
const double R_g=8.31;                        /* gas constant */
double A;              /*oberflaechenkonzentration*/
double kg;
double ks;

double m_0,m_1,m_2;

DEFINE_DIFFUSIVITY(partical_diffusivity,c,t,i)
{
        double Sct=0.7;
        double D_tur;
        double D_mol=5e-9;/*计算得出,但是发现粒径直接影响着数量级*/
        real D_eff;

        D_tur=C_MU_T(c,t)/Sct;
        D_eff=D_mol+D_tur;

        return D_eff;
}

DEFINE_SOURCE(surface_source,c,t,dS,eqn)
{
        real a_p0 = 0.4991e-16;           /*TiO2:表面积*/       
        real A ;              /*表面积浓度*/
        double Amin;           /*颗粒等效圆表面积*/
        double Rs;
        double tf;
        double d_p;             /*直径*/
        double a_p;              /**/
        double n_p;              /*数量 */
        double d_v;
        double v_a;
        double J;
        real source;
        real Y_1 = C_YI(c,t,1);
        m_0        =        C_UDSI(c,t,0);
        m_1        =        C_UDSI(c,t,1);
        m_2        =        C_UDSI(c,t,2);
        A         = C_UDSI(c,t,3);
        d_p = 6.0*m_1/A;
        a_p = pi*pow((6*m_1/A),2.0);
        n_p = (1./(36*pi))*((pow(A,3.0))/(pow(m_1,2.)*m_0));


        v_a=m_1/m_0;    /* solve for v_a */

        d_v=pow(6.0*(v_a/2.0)/pi,1./3.);  /*v_a is Unknown number*/

        tf=k0*pow(d_p,m)*(C_T(c,t)/T)*exp((EA/R_g)*(1./C_T(c,t)-1./T));

        Amin=pow(pi*m_0,1./3.)*pow(6.0*m_1,2./3.);

        if(n_p<2.0)
                Rs=(A-Amin)/(tf*(d_v));
        else
        {
                Rs=(n_p-1.0)*(0.41*a_p/(tf*d_p));
        }

        kg=3.96e5*exp(-8479.7/C_T(c,t));

        J=kg*Y_1*Nav;

        source=J*a_p0-Rs;
        dS[eqn]=0;

        return source;
}



DEFINE_SOURCE(TTIP_source,c,t,dS,eqn)
{


        real x[ND_ND];
        real w_1,w_2;
        real Y_1=C_YI(c,t,1);
        kg=3.96e5*exp(-8479.7/C_T(c,t));
        ks=1e9*exp(-8479.7/C_T(c,t));

        w_1=-(kg+ks*A)*Y_1;

        dS[eqn]=0;

        return w_1;
}


DEFINE_SOURCE(TiO2_source,c,t,dS,eqn)
{



        real x[ND_ND];
        real w_1,w_2;
        real Y_1=C_YI(c,t,1);
        kg=3.96e5*exp(-8479.7/C_T(c,t));
        ks=1e9*exp(-8479.7/C_T(c,t));

        w_1=-(kg+ks*A)*Y_1;
        w_2=-w_1;

        dS[eqn]=0;

        return w_2;
}
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

rabbitpig

银虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
不是udsi的错,写得太乱了
9楼2015-05-14 11:56:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 9 个回答

moons2

金虫 (正式写手)

【答案】应助回帖

感谢参与,应助指数 +1
怎么个初始化失败,发图来看
2楼2015-05-12 14:43:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

皮皮考拉

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by moons2 at 2015-05-12 14:43:40
怎么个初始化失败,发图来看

终于有人理我了
仿佛在黑暗之中有了一丝亮光!!!!
chip-exec: TTIP_source: wrong return type: void udf function expected
Error:
FLUENT received fatal signal (ACCESS_VIOLATION)
1. Note exact events leading to error.
2. Save case/data under new name.
3. Exit program and restart to continue.
4. Report error to your distributor.
Error Object: ()
3楼2015-05-12 15:02:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

死天

专家顾问 (著名写手)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
皮皮考拉: 回帖置顶 2015-05-21 09:39:47
皮皮考拉: 金币+2, 有帮助, 程序没问题,是我自己导进去计算时错了,谢谢你啊 2015-05-21 09:40:27
C_UDSI的数量开了吗?
4楼2015-05-12 15:04:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 面上模板改不了页边距吧? +3 ieewxg 2026-02-25 3/150 2026-02-28 18:25 by addressing
[考研] 高分子化学与物理调剂 +4 好好好1233 2026-02-28 5/250 2026-02-28 18:20 by liqiongjy
[考研] 285求调剂 +5 满头大汗的学生 2026-02-28 5/250 2026-02-28 18:10 by 材料专硕调剂;
[考研] 材料类求调剂 +4 wana_kiko 2026-02-28 4/200 2026-02-28 18:08 by djennjx
[考研] 材料调剂 +3 爱擦汗的可乐冰 2026-02-28 3/150 2026-02-28 18:06 by houyaoxu
[考研] 276求调剂 +3 路lyh123 2026-02-28 3/150 2026-02-28 18:02 by houyaoxu
[考研] 求调剂 +3 repeatt?t 2026-02-28 3/150 2026-02-28 18:00 by houyaoxu
[考研] 085600材料工程一志愿中科大总分312求调剂 +5 吃宵夜1 2026-02-28 7/350 2026-02-28 17:57 by njzyff
[考研] 311求调剂 +6 南迦720 2026-02-28 6/300 2026-02-28 17:17 by 刘茉莉
[考研] 化工专硕348,一志愿985求调剂 +3 弗格个 2026-02-28 5/250 2026-02-28 17:04 by sandychj
[高分子] 求环氧树脂研发1名 +3 孙xc 2026-02-25 11/550 2026-02-28 16:57 by ichall
[考博] 26申博 +3 想申博! 2026-02-26 3/150 2026-02-28 16:07 by nxgogo
[考研] 295求调剂 +4 19171856320 2026-02-28 4/200 2026-02-28 13:39 by ms629
[考研] 290求调剂 +4 材料专硕调剂; 2026-02-28 5/250 2026-02-28 13:32 by houyaoxu
[考研] 0856调剂 +3 刘梦微 2026-02-28 3/150 2026-02-28 13:22 by houyaoxu
[考研] 304求调剂 +5 曼殊2266 2026-02-28 6/300 2026-02-28 12:44 by 迷糊CCPs
[硕博家园] 博士自荐 +6 科研狗111 2026-02-26 9/450 2026-02-28 12:32 by seaskyy
[考研] 298求调剂 +4 axyz3 2026-02-28 4/200 2026-02-28 11:21 by wang_dand
[基金申请] 什么是人一生最重要的? +10 瞬息宇宙 2026-02-21 10/500 2026-02-27 08:46 by tfang
[基金申请] 面上可以超过30页吧? +12 阿拉贡aragon 2026-02-22 13/650 2026-02-26 22:09 by Hahaxia
信息提示
请填处理意见