24小时热门版块排行榜    

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

hwj14250

新虫 (初入文坛)

[求助] 现有源程序,怎么用VC6.0编译加载到fluent中,希望大神帮我运行一下,本人不胜感激!

#include"udf.h"
#include"sg.h"
#define e1 8.854E-12
#define pi 3.1415926
#define phi 0
#define electron 1.602E-19
#define qp 2000
DEFINE_ADJUST(adjust_fcn,d)
{
        Thread *t;
        cell_t c;
        if(! Date_Valid_P())
                return;
        thread_loop_c(t,d)
        {
                if(FLUID_THREAD_P(t))
                {
                        begin_c_loop_all(c,t)
                        {
                                C_UDMI(c,t,0)=NV_MAG(C_UDSI_G(c,t,0));
                                C_UDMI(c,t,1)=-C_UDSI_G(c,t,0)[0];
                                C_UDMI(c,t,2)=-C_UDSI_G(c,t,0)[1];
                        }
                        end_c_loop_all(c,t)
                }
        }
}
DEFINE_DPM_BODY_FORCE(particle_body_force,tp,i)
{
        real bforce=0.0;
                real xc[ND_ND];
        Particle *p;
        cell_t c;
        Thread *t;
        c=P_CELL(tp);
        t=P_CELL_THREAD(tp);
        C_CENTROID(xc,c,t);
        if(i==0)
                bforce=-C_UDSI_G(c,t,0)[0]*qp*electron+qp*electron*qp*electron/(16.0*pi*(0.089-xc[0])*(0.088-xc[0]));
        else if(i==1)
                bforce=-C_UDSI_G(c,t,0)[1]*qp*electron+qp*electron*qp*electron/(16.0*pi*(0.089-xc[0])*(0.088-xc[0]));
        return (bforce/P_MASS(tp));
}
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

死天

专家顾问 (著名写手)

【答案】应助回帖

★
臭水沟: 金币+1, 谢谢交流~ 2013-09-18 20:29:38
先装个VS或者C吧。然后百度设置变量环境
5楼2013-09-17 16:43:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 11 个回答

死天

专家顾问 (著名写手)

【答案】应助回帖

★
感谢参与,应助指数 +1
1592203609: 金币+1, 谢谢回帖 2013-09-17 14:31:36
用fluent自带的complie导入,看帮助
2楼2013-09-17 13:20:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

for_the_king

新虫 (小有名气)


【答案】应助回帖

感谢参与,应助指数 +1
编写体积力的公式?tig还是?
3楼2013-09-17 14:49:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hwj14250

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by 死天 at 2013-09-17 13:20:50
用fluent自带的complie导入,看帮助

我将程序的"文本文件“和case&data文件放在一个文件夹中,complied udfs时出现下列错误
Reading "C:\Users\acer\Desktop\dc\default_id4344.dat"...
Done.
系统找不到指定的文件。
(system "copy D:\Fluent6.3\fluent\Fluent.Inc\fluent6.3.26\src\makefile_nt.udf libudf\ntx86\2d\makefile"
已复制         1 个文件。
(chdir "libudf"()
(chdir "ntx86\2d"()

Done.
真心不知道怎么弄了
4楼2013-09-17 16:33:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:34 by XQNyDCa1Tk5n
[找工作] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 22:26 by XQNyDCa1Tk5n
[公派出国] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:26 by XQNyDCa1Tk5n
[考博] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:15 by XQNyDCa1Tk5n
[考博] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 22:11 by XQNyDCa1Tk5n
[基金申请] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 qR2AdCWTVtkw 2026-10-09 9/450 2026-10-11 22:06 by XQNyDCa1Tk5n
[教师之家] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 22:06 by XQNyDCa1Tk5n
[有机交流] OpenAI又攻克数学难题了,离AI做有机合成还有多远? +3 wangyl_123 2026-10-10 6/300 2026-10-11 15:04 by Abin0406
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 (EPI+-1)(金币-50) +5 qR2AdCWTVtkw 2026-10-09 10/500 2026-10-11 14:25 by VOMexwnDzOFZ
[教师之家] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 (EPI+-1)(金币-50) +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 14:05 by VOMexwnDzOFZ
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:51 by VOMexwnDzOFZ
[硕博家园] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +5 qR2AdCWTVtkw 2026-10-09 8/400 2026-10-11 13:45 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:54 by VOMexwnDzOFZ
[找工作] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +4 qR2AdCWTVtkw 2026-10-09 7/350 2026-10-11 10:34 by VOMexwnDzOFZ
[考博] 招收博士生一名 +3 mandolin 2026-10-10 3/150 2026-10-11 10:21 by 不是山谷!
[教师之家] 课题组会帮你通过考核么? +3 好运来~9527 2026-10-10 5/250 2026-10-11 09:00 by 好运来~9527
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +4 qR2AdCWTVtkw 2026-10-09 4/200 2026-10-11 03:14 by M0zrYVSAnxpE
[有机交流] 各位大佬,路线设计求助 +6 zapen 2026-10-08 8/400 2026-10-10 15:59 by zapen
[基金申请] 入职后第一次管课题组的专利缴费,对账才发现官费比别人多掏了一倍 +5 13108017953 2026-10-08 5/250 2026-10-10 11:15 by wdwd123
[有机交流] 我应该选哪条合成路线让实验成功率高一些? +5 jing816y 2026-10-08 9/450 2026-10-10 09:05 by zapen
信息提示
请填处理意见