非常简单的一个算例,却搞不收敛,急!请指教,谢谢!

cookyzhao

/FILNAME,TRANSIENT1
/TITLE,cooling a cylinder
/PREP7
ET,1,PLANE55,,,1         ！单元类型
RECTING,0.0017,0.02,0,0.02     !几何模型
RECTING,0,0.02,-0.02,0
AADD,ALL
mp,dens,1,1000
MPTEMP,1,-150            !材料物性
MPTEMP,2,-0.5
MPTEMP,3,0.5
MPTEMP,4,37
MPDATA,KXX,1,,2.24
MPDATA,KXX,1,,2.24
MPDATA,KXX,1,,0.561
MPDATA,KXX,1,,0.561
MPTEMP,,,,,,,,
MPTEMP,1,-150            !材料物性
MPTEMP,2,-0.5
MPTEMP,3,0.5
MPTEMP,4,37
MPDATA,ENTH,1,,0
MPDATA,ENTH,1,,2.9E8
MPDATA,ENTH,1,,6.22E8
MPDATA,ENTH,1,,7.76E8
SMRT,3                 !划分网格
AMESH,ALL
/SOLU
ANTYPE,trans
OUTRES,,ALL,   !时间设置
bfunif,temp,37 !初始温度
/com *DIM,TEMP_TIME,TABLE,4,,,TIME     !温度的变化
/com *SET,TEMP_TIME(1,0),0,120,1020,1224
/com *SET,TEMP_TIME(1,1),37,-150,-150,20
*DIM,TEMP_TIME,TABLE,2,,,TIME     !温度的变化
*SET,TEMP_TIME(1,0),0,120
*SET,TEMP_TIME(1,1),37,-150
!加温度载荷
DL,4,,temp,%TEMP_TIME%,1
DL,9,,temp,%TEMP_TIME%,1
SFL,2,HFLUX,0,
SFL,5,HFLUX,0,
SFL,10,HFLUX,0,
allsel
KBC,1
AUTOTS,on
DELTIM,0.01,0.01,10
TIME,120
SOLVE         ！求解
finish