| 查看: 1875 | 回复: 10 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[求助]
现有源程序，怎么用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)); } |
回复此楼» 猜你喜欢
材料，纺织，生物（0856、0710），化学招生啦
已经有8人回复
-
0703化学调剂 ，六级已过，有科研经历
已经有9人回复
-
工科材料085601 279求调剂
已经有6人回复
-
070300化学319求调剂
已经有5人回复
-
生物学071000 329分求调剂
已经有3人回复
-
0703化学调剂
已经有6人回复
-
304求调剂
已经有12人回复
-
288求调剂，一志愿华南理工大学071005
已经有3人回复
-
307求调剂
已经有3人回复
-
312求调剂
已经有8人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 同一个程序用vc6.0与vc2005运行出来的结果不一样
已经有8人回复
- UDF中DEFINE_ADJUST宏中使用C_UDSI_G
已经有36人回复
- 请教win7中怎么使用vc6.0
已经有11人回复
- 怎样解决FLUENT received fatal signal (ACCESS_VIOLATION)的错误？
已经有20人回复
- 【求助】vc6.0运行一个exe文件对图像进行canny边缘检测时就会出现以下错误，请教如何�
已经有5人回复
6楼2013-09-17 17:02:50
死天
专家顾问 (著名写手)
-
专家经验: +60 - 应助: 399 (硕士)
- 金币: 3648.9
- 红花: 89
- 帖子: 1336
- 在线: 443.8小时
- 虫号: 2643057
- 注册: 2013-09-09
- 专业: 流体力学
- 管辖: 仿真模拟
2楼2013-09-17 13:20:50
for_the_king 
新虫 (小有名气)
- 应助: 91 (初中生)
- 金币: -169.1
- 红花: 3
- 帖子: 156
- 在线: 4.5小时
- 虫号: 2638376
- 注册: 2013-09-05
- 性别: MM
- 专业: 流体力学
3楼2013-09-17 14:49:31
|
我将程序的"文本文件“和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
