文档介绍:我的硕士论文的一部分】求解温度场
©©©!上表面上没有对流换热边界条件
!单位制:米、秒、摄氏度
!
/CLEAR,START
/FILNAME,temp,0
/COM,:ngth,-HeightBase,WidthBase,
V,16,13,27,25,15,14,28,26
V,24,21,27,13,23,22,28,14
!高度方向
!长度方向
!宽度方向
BLOCK,0,Length,0,HeightDeposition,0,WidthClad,
VGLUE,ALL
NUMCMP,ALL
!=========================================================
==================!划分网格
LSEL,S,LOC,Y,dt,HeightDeposition-dt,
LESIZE,ALL,,,Layer,
LSEL,S,LOC,Y,-DT,-+DT
LSEL,R,LOC,X,0
LESIZE,ALL,,,4,2
LSEL,S,LOC,Y,-DT,-+DT
LSEL,R,LOC,X,Length
LESIZE,ALL,,,4,
LSEL,S,LOC,Y,--DT,-HeightBase+DT
LSEL,R,LOC,Z,0,WidthBase-DT,
LESIZE,ALL,,,4,2
LSEL,S,LOC,Y,--DT,-HeightBase+DT
LSEL,R,LOC,Z,WidthBase,
LESIZE,ALL,,,4,
LSEL,S,LOC,X,dt,Length-dt,
LESIZE,ALL,,,Length/StepDis,
LSEL,S,LOC,Z,dt,WidthClad-dt,
LESIZE,ALL,,,1,
LSEL,S,LOC,Z,WidthClad+DT,-DT
LESIZE,ALL,,,4,
LSEL,S,LOC,Z,+DT,WidthBase-DT
LSEL,R,LOC,Y,-DT,-HeightBase
LESIZE,ALL,,,4,2
LSEL,S,LOC,Z,+DT,WidthBase-DT
LSEL,R,LOC,Y,0
LESIZE,ALL,,,4,
VSEL,S,LOC,Y,0,HeightDeposition!网格划分
TYPE,1
MAT,1
MSHAPE,0,3D
MSHKEY,1
VMESH,ALL
VSEL,S,LOC,Y,-1,0!网格划分
TYPE,1
MAT,1
MSHAPE,0,3D
MSHKEY,1
VMESH,ALL
ALLSEL,ALL
!=============================================================================
==================!基底边界条件、初始条件
NSEL,S,LOC,Y,-HeightBase,0!基底初始温度
IC,ALL,TEMP,InitTemp
ALLSEL,ALL
NSEL,S,LOC,Y,-HeightBase,0!基底侧面,换热边界条件
NSEL,R,LOC,Z,WidthBase
SF,ALL,CONV,CoffConv,Temp
ALLSEL,ALL
NSEL,S,LOC,Y,-HeightBase,0
件
NSEL,R,LOC,X,0
SF,ALL,CONV,CoffConv,Temp
ALLSEL,ALL
NSEL,S,LOC,Y,-HeightBase,0
件
!基底左端面,换热边界条
!基底右端面,换热边界条
NSEL,R,LOC,X,Length
SF,ALL,CONV,CoffConv,Temp
NSEL,S,LOC,Y,0
条件
!基底上表面,换热边界
ALLSEL,ALL
NSEL,R,LOC,Z,WidthClad,WidthBase
SF,ALL,CONV,CoffConv,Temp
ALLSEL,ALL
FINISH
/SOLU
!======================================