用編譯型udf移動高斯熱源

① udf中關於C_YI_G（c,t，i）和F_AREA(A,f,t)的使用

用編譯型的試試看握舉。
另段鋒碧外，F_AREA(A,f,t)是計算面的面積，這個f你沒有給基做他賦值，所以會報錯。

② 哪位有ansys施加高斯移動熱源的詳細步驟和例子，能否給我發一份,謝謝!

/FILNAME,weldingstress,0
/PREP7
!定義焊接參數
L=1E-1 !焊件的長度
W=1E-1 !焊件的寬度
H=6E-3 !焊件正廳的高度
U=20 !焊接電壓
I=160 !焊接電流
V=0.01 !焊接速度
YITA=0.7 !焊接熱效率
R=0.007 !電弧有效加熱半徑
Q=U*I*YITA !電弧熱功率
Qm=3/3.1415/R**2*Q !加熱斑點中心最大熱流慧頃密度
!*
ET,1,PLANE55
ET,2,SOLID70

MPTEMP,,,,,,,,
MPTEMP,1,20
MPTEMP,2,200
MPTEMP,3,500
MPTEMP,4,750
MPTEMP,5,1000
MPTEMP,6,1500
MPTEMP,7,1700
MPTEMP,8,2500

MPDATA,KXX,1,,50
MPDATA,KXX,1,,47
MPDATA,KXX,1,,40
MPDATA,KXX,1,,27
MPDATA,KXX,1,,30
MPDATA,KXX,1,,35
MPDATA,KXX,1,,40
MPDATA,KXX,1,,55

MPDATA,DENS,1,,7820
MPDATA,DENS,1,,7700
MPDATA,DENS,1,,7610
MPDATA,DENS,1,,7550
MPDATA,DENS,1,,7490
MPDATA,DENS,1,,7350
MPDATA,DENS,1,,7300
MPDATA,DENS,1,,7090
MPDATA,C,1,,460
MPDATA,C,1,,480
MPDATA,C,1,,530
MPDATA,C,1,,675
MPDATA,C,1,,670
MPDATA,C,1,,660
MPDATA,C,1,,780
MPDATA,C,1,,820
MPDATA,EX,1,,2.05E11
MPDATA,EX,1,,1.87E11
MPDATA,EX,1,,1.5E11
MPDATA,EX,1,,0.7E11
MPDATA,EX,1,,0.2E11
MPDATA,EX,1,,0.19E2
MPDATA,EX,1,,0.18E2
MPDATA,EX,1,,0.12e2

MPDATA,PRXY,1,,0.28
MPDATA,PRXY,1,,0.29
MPDATA,PRXY,1,,0.31
MPDATA,PRXY,1,,0.35
MPDATA,PRXY,1,,0.4
MPDATA,PRXY,1,,0.45
MPDATA,PRXY,1,,0.48
MPDATA,PRXY,1,,0.5

UIMP,1,REFT,,,20
MPDATA,ALPX,1,,1.1e-5
MPDATA,ALPX,1,,1.22e-5
MPDATA,ALPX,1,,1.39e-5
MPDATA,ALPX,1,,1.48e-5
MPDATA,ALPX,1,,1.34e-5
MPDATA,ALPX,1,,1.33e-5
MPDATA,ALPX,1,,1.32e-5
MPDATA,ALPX,1,,1.31e-5

TB,BISO,1,6,2,
TBTEMP,20
TBDATA,,220e6,0,,,,
TBTEMP,250
TBDATA,,175e6,0,,,,
TBTEMP,500
TBDATA,,80e6,0,,,,
TBTEMP,750
TBDATA,,40E6,0,,,,
TBTEMP,1000
TBDATA,,10E6,0,,,,
TBTEMP,1500
TBDATA,,1E-5,0,,,,

K,1,0,0,0
K,2,0,L,0
K,3,-W/2*0.15,L,0
K,4,-W/2*0.3,L,0
K,5,-W/2*0.5,L,0
K,6,-W/舉碧隱2,L,0
K,7,-W/2,0,0
K,8,-W/2*0.5,0,0
K,9,-W/2*0.3,0,0
K,10,-W/2*0.15,0,0
K,11,0,0,H
A,1,2,3,10
A,10,3,4,9
A,9,4,5,8
A,8,5,6,7

ESIZE,0.0012
AMESH,1
ESIZE,0.0025
AMESH,2
ESIZE,0.005
AMESH,3
ESIZE,0.0065
AMESH,4

TYPE, 2
EXTOPT,ESIZE,2,0,
EXTOPT,ACLEAR,1
!*
EXTOPT,ATTR,1,0,0
REAL,_Z4
ESYS,0
!*
VOFFST,1,H, ,
VOFFST,2,H, ,
VOFFST,3,H, ,
VOFFST,4,H, ,
EPLOT
NUMMRG,ALL, , , ,LOW

/SOL
!*
ANTYPE,4
!*
TRNOPT,FULL
LUMPM,0
*DEL,_FNCNAME
*DEL,_FNCMTID
*DEL,_FNC_C1
*DEL,_FNC_C2
*DEL,_FNC_C3
*DEL,_FNCCSYS
*SET,_FNCNAME,'GAOSI'
*DIM,_FNC_C1,,1
*DIM,_FNC_C2,,1
*DIM,_FNC_C3,,1
*SET,_FNC_C1(1),QM
*SET,_FNC_C2(1),V
*SET,_FNC_C3(1),R
*SET,_FNCCSYS,0
! /INPUT,HANJIE.func,,,1
*DIM,%_FNCNAME%,TABLE,6,19,1,,,,%_FNCCSYS%
!
! Begin of equation: Qm*exp(-3*({X}^2+({Y}-V*{TIME})^2)/R^2)
*SET,%_FNCNAME%(0,0,1), 0.0, -999
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), %_FNC_C1(1)%
*SET,%_FNCNAME%(4,0,1), %_FNC_C2(1)%
*SET,%_FNCNAME%(5,0,1), %_FNC_C3(1)%
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 0, 0, 0, 0
*SET,%_FNCNAME%(0,2,1), 0.0, -2, 0, 1, 0, 0, -1
*SET,%_FNCNAME%(0,3,1), 0, -3, 0, 1, -1, 2, -2
*SET,%_FNCNAME%(0,4,1), 0.0, -1, 0, 3, 0, 0, -3
*SET,%_FNCNAME%(0,5,1), 0.0, -2, 0, 1, -3, 3, -1
*SET,%_FNCNAME%(0,6,1), 0.0, -1, 0, 2, 0, 0, 2
*SET,%_FNCNAME%(0,7,1), 0.0, -3, 0, 1, 2, 17, -1
*SET,%_FNCNAME%(0,8,1), 0.0, -1, 0, 1, 18, 3, 1
*SET,%_FNCNAME%(0,9,1), 0.0, -4, 0, 1, 3, 2, -1
*SET,%_FNCNAME%(0,10,1), 0.0, -1, 0, 2, 0, 0, -4
*SET,%_FNCNAME%(0,11,1), 0.0, -5, 0, 1, -4, 17, -1
*SET,%_FNCNAME%(0,12,1), 0.0, -1, 0, 1, -3, 1, -5
*SET,%_FNCNAME%(0,13,1), 0.0, -3, 0, 1, -2, 3, -1
*SET,%_FNCNAME%(0,14,1), 0.0, -1, 0, 2, 0, 0, 19
*SET,%_FNCNAME%(0,15,1), 0.0, -2, 0, 1, 19, 17, -1
*SET,%_FNCNAME%(0,16,1), 0.0, -1, 0, 1, -3, 4, -2
*SET,%_FNCNAME%(0,17,1), 0.0, -1, 7, 1, -1, 0, 0
*SET,%_FNCNAME%(0,18,1), 0.0, -2, 0, 1, 17, 3, -1
*SET,%_FNCNAME%(0,19,1), 0.0, 99, 0, 1, -2, 0, 0
! End of equation: Qm*exp(-3*({X}^2+({Y}-V*{TIME})^2)/R^2)
TUNIF,20, !定義初始溫度
!定義對流換熱邊界
SFA,15,1,CONV,30,20
SFA,20,1,CONV,30,20
SFA,9,1,CONV,30,20
SFA,14,1,CONV,30,20
SFA,19,1,CONV,30,20
SFA,24,1,CONV,30,20
SFA,23,1,CONV,30,20
SFA,7,1,CONV,30,20
SFA,12,1,CONV,30,20
SFA,17,1,CONV,30,20
SFA,22,1,CONV,30,20
SFA,1,1,CONV,30,20
SFA,2,1,CONV,30,20
SFA,3,1,CONV,30,20
SFA,4,1,CONV,30,20
!施加高斯熱源
SFA,5,1,HFLUX, %GAOSI%
SFA,10,1,HFLUX, %GAOSI%
OUTRES,ALL,ALL,
TIME,L/V !設置求解時間
AUTOTS,-1
NSUBST,50,50,50
KBC,0
TSRES,ERASE
LSWRITE,1, !寫入載荷文件為1
!*
TIME,20
AUTOTS,1
NSUBST,20,20,20
KBC,0
!*
TSRES,ERASE ！刪除之前定義的時間步設置
LSWRITE,2,
TIME,50
AUTOTS,1
NSUBST,30,30,30
KBC,0
!*
TSRES,ERASE
LSWRITE,3,
TIME,1100
AUTOTS,1
NSUBST,105,105,105
KBC,0
!*
TSRES,ERASE
LSWRITE,4,

LSSOLVE,1,4,1, !開始求解
!進入熱應力求解
/PREP7
ETCHG,TTS !熱到結構分析轉換
/SOL
ANTYPE,4
TRNOPT,FULL
LUMPM,0
NLGEOM,1
NROPT,FULL, ,OFF
!定義熱應力計算參考溫度
TREF,20,
DA,6,SYMM
DL,13, ,UY,
DL,10, ,UY,
DL,7, ,UY,
DL,4, ,UY,
DL,1, ,UZ,

*DO,I,1,50
LDREAD,TEMP,,,0.2*I, ,'weldingstress','rth',' ' !讀入熱分析的計算結果
OUTRES,ALL,ALL,
TIME,0.2*I
DELTIM,0.2,0.075,0.2,1
SOLVE
*ENDDO
*DO,I,1,20
LDREAD,TEMP,,,10+I*0.5, ,'weldingstress','rth',' '
OUTRES,ALL,ALL,
TIME,10+I*0.5
DELTIM,0.5,0.5,1,1
SOLVE
*ENDDO
*DO,I,1,30
LDREAD,TEMP,,,20+I, ,'weldingstress','rth',' '
OUTRES,ALL,ALL,
TIME,20+I
DELTIM,1,1,1,1
SOLVE
*ENDDO
*DO,I,1,105
LDREAD,TEMP,,,50+10*I, ,'weldingstress','rth',' '
OUTRES,ALL,ALL,
TIME,50+10*I
DELTIM,10,10,10,1
SOLVE
*ENDDO

③ 如何編譯udf，使得初始化時獲得溫度隨y變化的初始溫度場（求編譯程序）

用init宏來實現，或者直接用customer field function也可以實現

④ 熱源項的一個簡單udf編譯報錯，求幫助

#include "udf.h"
#define R 50.0
DEFINE_SOURCE(heat_source,c,t,cylinder)
{
real x[ND_ND];
float source;
cell_t cc;（。沖談。。）
Thread *tt; （。。。悉判答。）
C_CENTROID(x,cc,tt); （。。。。）
{
if(sqrt(pow(x[0],2.)+pow(x[1],2.))>0.9*R)（。。。）
source=5000;
else
source=0;
}
return source;
}
請注意cc tt還有if括弧里的東西，你的括弧打的有點亂。還有就是DEFINE_SOURCE(xmom_source,c,t,dS,eqn)這個格式才是正確的，你少了一項。盡量多看fluent中睜慧自帶的幫助文件。

⑤ fluent中編入UDF文件遇到問題

1. 使用編譯型UDF。

2. 嘗試御培升級一帶衫下電腦的VS。

3. 沒見過stdio.h這種頭文件鎮行唯的UDF
   

⑥ Fluent熱源設置：生熱速率隨溫度變化，UDF怎麼編寫啊！！

#include "udf.h"。real T=C_T(c,t)這是fluent本身自帶宏，用於獲取數據儲存胞元的溫度值，關於pow(x,y)函數則是C++的語法結構，數學表達式是x^y。

基本用戶定義函數是一類代碼，對MYSQL伺服器功能進行擴充，通過添加新函數，性質就象使用本地MYSQL函數abs()或concat().UDF是用C（或C++）寫的。也許還可以用BASIC，C#或其它什麼語言。

(6)用編譯型udf移動高斯熱源擴展閱讀：

FLUENT軟體包含基於壓力的分離求解器、基於密度的隱式求解器、基於密度的顯式求解器，多求解器技術使FLUENT軟體可以用來模擬從不可壓縮到高超音速范圍內的各種復雜流場。FLUENT軟體包含非常豐富、經過工程確認的物理模型。

因而FLUENT能達到最佳的收斂速度和求解精度。靈活的非碰桐結構化網格和基於解的自適應網格技術及成熟的物理模型，可以模擬高超音速流場、傳熱與相變、化學反應與燃燒、多相流、旋轉機械、動/變形網格、噪笑巧坦聲、材料加工等復雜機理的流動問題。

參寬亮考資料來源：網路-UDF

⑦ FLUENT 電池模塊的散熱分析 udf 熱源

看過含態遲你閉型就懂了談李

⑧ fluent熱源udf

#include "udf.h"
DEFINE_SOURCE(heat-gen,c,t,dS,eqn)
{
real A=;
real B=;
real C=;
real D=;
real T=C_T(c,t);
real source=A*T+ B*pow{T,2)+ C*pow{T,3)+ D*pow{T,4);
dS[eqn]=0;//關於dS系源項對溫度的一階偏頃叢導,來殲察源於傅里葉展開,可以設置該值,簡氏乎茄化處理默認為零
return source;
}