/FILNAME,EXERCISE3
/TITLE,RADIATION BETWEEN INFINITE COAXIAL CYLINDERS
KEYW,PR_THERM,1
/PREP7
ET,1,PLANE55
MP,DENS,1,7800
MP,KXX,1,70
MP,C,1,480
MP,DENS,2,2700
MP,KXX,2,30
MP,C,2,350
/RGB,INDEX,100,100,100, 0
/RGB,INDEX, 80, 80, 80,13
/RGB,INDEX, 60, 60, 60,14
/RGB,INDEX, 0, 0, 0,15
/REPLOT
CYL4,0,0,0.1,90,0.2
CYL4,0,0,0.4,90,0.5
/TITLE,GEOMETRIC MODEL
APLOT
/PNUM,LINE,1
/PNUM,AREA,1
/REPLOT
LSEL,S,,,2,4,2
LESIZE,ALL,,,5
LSEL,S,,,1,3,2
LESIZE,ALL,,,10
LSEL,S,,,6,8,2
LESIZE,ALL,,,6
LSEL,S,,,5,7,2
LESIZE,ALL,,,30
MSHAPE,0,2D
MSHKEY,1
AMESH,1
APLOT
MAT,2
AMESH,2
ARSYM,X,ALL
ARSYM,Y,ALL
NUMMRG,NODE
NUMMRG,KP
/TITLE,ELEMENT IN MODEL
EPLOT
ALLSEL
/AUX12
STEF,5.67E-8
TOFFST,273
RADOPT,,0.001
SPCTEMP,1,20
FINISH
/SOLU
ANTYPE,TRANS
TIME,1000
DELTIM,15,15,30
TOFFST,273
LSEL,S,,,1,7,6
LSEL,A,,,9,15,6
LSEL,A,,,17,23,6
LSEL,A,,,25,31,6
SFL,ALL,RDSF,1,,1
LSEL,S,,,5,29,8
DL,ALL,,TEMP,800,1
LSEL,S,,,3,27,8
DL,ALL,,TEMP,500,1
ALLSEL
OUTOTS,ON
KBC,1
OUTRES,,ALL
OUTPR,NSOL,LAST
SOLVE
FINISH
/POST1
SET,LAST
ESEL,S,MAT,,1
NSLE,S
PLNSOL,TEMP
/POST26
NSOL,2,314,TEMP
/GRID,1
/AXLAB,X,TIME(sec)
/AXLAB,Y,TEMP
PLVAR,2
为什么最后得到的曲线温度变化时从零开始的啊?一个物体800度,一个物体500度,应该从800开始下降的啊?为什么从0度开始上升的啊?望大家多多指教,自己搞不定啊 |