題目
管子內徑外徑為r1=4.125mm，r2=4.635mm，中間物體的產熱功率為Q=8.73e8W/m3,管外有溫度t=127℃的冷水流過，冷卻水與管子外表面的換熱系數為1000W(m2.℃)，導熱系數分別為外側17.2W/(m2.℃),內側為2.6W/(m2.℃)
APDL操作
/CLEAR
/FILNAME,test_temp1,0
/PREP7
ET,1,PLANE55 !定義單元類型
KEYOPT,1,3,0 !設置為平板分析
!定義參數
*SET,R1,4.125E-3
*SET,R2,4.635E-3
*SET,Q,8.73E8
*SET,T0,127
*SET,AP,10000
!定義鈾燃料棒的導熱系數
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,1,,2.6
!定義合金的導熱系數
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,2,,17.2
!建立1/4的面
PCIRC,R1, ,0,90,
PCIRC,R2, ,0,90,
!布爾操作--
FLST,2,2,5,ORDE,2
FITEM,2,1
FITEM,2,-2
AOVLAP,P51X
/PNUM,AREA,1
/REPLOT
!設置1號的屬性
ASEL,S,,,1
AATT,1,,1
!設置鋯錫合金的單元屬性
ASEL,S,,,3
AATT,2,,1
ALLSEL,ALL
ESIZE,0.0003,0, !定義單元划分尺寸
MSHKEY,2 !設置映射單元划分選項
AMESH,ALL !划分單元
FLST,2,1,5,ORDE,1 !設置熱量產生，用前面定義的參數來定義
FITEM,2,1
/GO
BFA,P51X,HGEN,Q
!BFA,1,HGEN,Q !施加熱生成載荷
FLST,2,1,4,ORDE,1
FITEM,2,4
/GO
SFL,P51X,CONV,AP, ,T0,
!SFL,4,CONV,AP, ,T0, !在4號線施加對流換熱邊載荷
FINISH
/SOLU !進入求解器設置
ANTYPE,0 !設置為穩態求解
TOFFST,273, !設置溫度偏移
TIME,1 !定義求解時間1
SOLVE !求解
/POST1
SET,LAST
/EFACET,1
PLNSOL, TEMP,, 0
溫度雲圖
