不好意思,下午出去有点事。刚才做了个和你上午传给我的差不多的算例,你看看。算例是一块10*10*1的板,在中心处加点热源持续一段时间后撤消热源。计算结果图中给出的三条曲线分别是中心点处开始向外的三个点温度时程图。
!非稳定温度场分析算例
/prep7
!* define material proterties
mp,kxx,1,7000
mp,c,1,448
mp,dens,1,7800
!* define element type
ET,1,SOLID70
!* define geometry
block,-5,5,-5,5,0,1
!* mesh geometry
ESIZE,0,20
lsel,s,loc,z,0.1,0.9
lesize,all,,,4
allsel,all
vmesh,all
FINISH
/SOLU
ANTYPE,TRANS !非稳定温度场分析
!*
TRNOPT,FULL
LUMPM,0
TUNIF,20 !定义初始均匀温度
nsel,s,loc,x,-0.01,0.01
nsel,r,loc,y,-0.01,0.01
F,ALL,HEAT,500
!BF,all,HGEN,5
ALLSEL,ALL
TIME,500 !计算结束时间为500秒(时间u单元根据材料参数里的传热系数的单位来定)
AUTOTS,-1
DELTIM,20 !步长20
KBC,0
OUTRES,ALL,ALL,
solve
fdele,all !去掉热源后再持续1500秒
time,2000
DELTIM,20
solve |