| 查看: 1898 | 回復(fù): 10 | |||
hwj14250新蟲 (初入文壇)
|
[求助]
現(xiàn)有源程序,怎么用VC6.0編譯加載到fluent中,希望大神幫我運(yùn)行一下,本人不勝感激!
|
||
|
#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)); } |
專家顧問 (著名寫手)
![]() |
專家經(jīng)驗(yàn): +60 |
新蟲 (小有名氣)
新蟲 (初入文壇)
|
我將程序的"文本文件“和case&data文件放在一個(gè)文件夾中,complied udfs時(shí)出現(xiàn)下列錯(cuò)誤 Reading "C:\Users\acer\Desktop\dc\default_id4344.dat"... Done. 系統(tǒng)找不到指定的文件。 (system "copy D:\Fluent6.3\fluent\Fluent.Inc\fluent6.3.26\src\makefile_nt.udf libudf\ntx86\2d\makefile" ![]() 已復(fù)制 1 個(gè)文件。 (chdir "libudf" ()(chdir "ntx86\2d" ()Done. 真心不知道怎么弄了 |
專家顧問 (著名寫手)
![]() |
專家經(jīng)驗(yàn): +60 |
新蟲 (初入文壇)
新蟲 (初入文壇)
專家顧問 (著名寫手)
![]() |
專家經(jīng)驗(yàn): +60 |
新蟲 (初入文壇)
專家顧問 (著名寫手)
![]() |
專家經(jīng)驗(yàn): +60 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 321求調(diào)劑 +10 | y-yh 2026-04-01 | 11/550 |
|
|---|---|---|---|---|
|
[考研] 330分求調(diào)劑 +13 | qzenlc 2026-03-29 | 13/650 |
|
|
[考研] 材料求調(diào)劑一志愿哈工大324 +10 | 閆旭東 2026-03-28 | 12/600 |
|
|
[考研] 環(huán)境285分,過六級(jí),求調(diào)劑 +6 | xhr12 2026-04-02 | 6/300 |
|
|
[考研] 求調(diào)劑!生物與醫(yī)藥專碩 +4 | 逆轉(zhuǎn)陸先生 2026-04-01 | 4/200 |
|
|
[考研] 337求調(diào)劑 +11 | 《樹》 2026-03-29 | 11/550 |
|
|
[考研] 377求調(diào)劑 +3 | RASKIN 2026-04-02 | 3/150 |
|
|
[考研] 一志愿211,335分,0856,求調(diào)劑院校和導(dǎo)師 +14 | 傾____蕭 2026-03-27 | 15/750 |
|
|
[考研] 一志愿安徽大學(xué)計(jì)算機(jī)科學(xué)與技術(shù)學(xué)碩,331分求調(diào)劑 +5 | 蔣昌鵬qtj 2026-04-01 | 5/250 |
|
|
[考研] 309求調(diào)劑 +19 | 誰不是少年 2026-03-29 | 19/950 |
|
|
[考研] 求調(diào)劑 +4 | DADA怪 2026-03-31 | 4/200 |
|
|
[碩博家園] 博一被送出聯(lián)培感覺不適應(yīng)怎么辦 +3 | 全村的狗 2026-03-31 | 3/150 |
|
|
[考研] 0710生物學(xué)求調(diào)劑! +6 | 敘述文 2026-03-31 | 6/300 |
|
|
[考研] 一志愿北京科技大學(xué)085601材料工程英一數(shù)二初試總分335求調(diào)劑 +5 | 雙馬尾痞老板2 2026-03-31 | 5/250 |
|
|
[考研] 299求調(diào)劑 +8 | 嗯嗯嗯嗯2 2026-03-27 | 8/400 |
|
|
[考研] 289求調(diào)劑 +3 | Acesczlo 2026-03-29 | 4/200 |
|
|
[考研] 英一數(shù)一總分334求調(diào)劑 +4 | 陳陽坤 2026-03-31 | 4/200 |
|
|
[考研] 抱歉 +3 | 田洪有 2026-03-30 | 3/150 |
|
|
[考研] 330一志愿中國海洋大學(xué) 化學(xué)工程 085602 有讀博意愿 求調(diào)劑 +3 | wywy.. 2026-03-27 | 4/200 |
|
|
[考研] 081200-11408-276學(xué)碩求調(diào)劑 +4 | 崔wj 2026-03-26 | 4/200 |
|