ex6-2.txt

ANSYS机械工程应用实例,在工程运用中很具典型代表

FINI
/CLE
/AUX15  
IGESIN,EX6-2,IGES
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST
FINISH
/FILENAME,EX6-2,1
/TITLE,The Transient Thermal Analysis of the CRT
/PREP7
ET,1,SHELL57
ET,2,LINK33
MP,KXX,1,0.8
MP,C,1,700
MP,DENS,1,3000
MP,KXX,2,48
MP,C,2,480
MP,DENS,2,8000
MP,KXX,3,45
MP,C,3,480
MP,DENS,3,8000
R,1,0.01
R,2,0.005
R,3,0.002 
R,4,0.01
!
TYPE,1
MAT,1
REAL,1
ESIZE,0.015
ASEL,S,AREA,,5
ASEL,A,AREA,,6
ASEL,A,AREA,,9
ASEL,A,AREA,,10
ASEL,A,AREA,,11
ASEL,A,AREA,,15
ASEL,A,AREA,,16
ASEL,A,AREA,,17
ASEL,A,AREA,,18
ASEL,A,AREA,,19
ASEL,A,AREA,,23
ASEL,A,AREA,,43
ASEL,A,AREA,,44
ASEL,A,AREA,,45
MSHKEY,0
MSHAPE,0,2D 
AMESH,ALL
AREVERSE,16,0
AREVERSE,18,0
AREVERSE,19,0
AREVERSE,43,0
!
TYPE,1
MAT,2
REAL,2
ESIZE,0.01
ASEL,S,AREA,,1
ASEL,A,AREA,,2
ASEL,A,AREA,,3
ASEL,A,AREA,,4
ASEL,A,AREA,,7
ASEL,A,AREA,,8
ASEL,A,AREA,,21
ASEL,A,AREA,,22
ASEL,A,AREA,,24
ASEL,A,AREA,,25
ASEL,A,AREA,,26
ASEL,A,AREA,,27
ASEL,A,AREA,,33
ASEL,A,AREA,,34
ASEL,A,AREA,,35
ASEL,A,AREA,,36
ASEL,A,AREA,,37
ASEL,A,AREA,,38
ASEL,A,AREA,,39
ASEL,A,AREA,,40
ASEL,A,AREA,,41
ASEL,A,AREA,,42
ASEL,A,AREA,,54
ASEL,A,AREA,,55
ASEL,A,AREA,,56
ASEL,A,AREA,,57
ASEL,A,AREA,,58
ASEL,A,AREA,,59
MSHKEY,0
MSHAPE,0,2D 
AMESH,ALL
AREVERSE,ALL,0
AREVERSE,1,0
AREVERSE,2,0
AREVERSE,39,0
AREVERSE,40,0
AREVERSE,41,0
AREVERSE,42,0
AREVERSE,25,0
AREVERSE,27,0
AREVERSE,33,0
AREVERSE,34,0
AREVERSE,35,0
AREVERSE,36,0
!
TYPE,1
MAT,3
REAL,3
ASEL,S,AREA,,12
ASEL,A,AREA,,13
ASEL,A,AREA,,14
ASEL,A,AREA,,28
ASEL,A,AREA,,29
ASEL,A,AREA,,30
ASEL,A,AREA,,31
ASEL,A,AREA,,32
ASEL,A,AREA,,46
MSHKEY,0
MSHAPE,0,2D 
AMESH,ALL
AREVERSE,32,0
AREVERSE,14,0
AREVERSE,13,0
AREVERSE,28,0
！
TYPE,2
MAT,3
REAL,4
E,696,2272
E,634,2388
E,781,3015
!
E,2273,3110
E,2329,3081
E,2644,3161
E,2968,3132
ALLSEL,ALL
SAVE
!
/SOLU
ANTYPE,4
TIMINT,ON
TIME,1
DELTIM,0.1,0.02,0.5
AUTOTS,ON
OUTRES,ALL,ALL
KBC,0
TUNIF,25
SFA,5,2,HFLUX,50
SFA,12,2,HFLUX,200
ASEL,S,REAL,,1
SFA,ALL,1,CONV,8,25 
ESEL,S,REAL,,1
SFE,ALL,1,RDSF,1,0.5 
SFE,ALL,1,RDSF,2,10 
SFE,ALL,2,RDSF,1,0.5 
SFE,ALL,2,RDSF,2,10 
ESEL,S,REAL,,2
SFE,ALL,1,RDSF,1,0.6 
SFE,ALL,1,RDSF,2,10 
SFE,ALL,2,RDSF,1,0.6 
SFE,ALL,2,RDSF,2,10 
ESEL,S,REAL,,3
SFE,ALL,1,RDSF,1,0.55 
SFE,ALL,1,RDSF,2,10 
SFE,ALL,2,RDSF,1,0.55 
SFE,ALL,2,RDSF,2,10 
STEF,5.67E-8
TOFFST,273
SPCTEMP,10,25
ALLSEL,ALL
LSWRITE,1
!LOAD STEP 2
TIME,20000
TIMINT,ON
DELTIM,20,5,200
AUTOTS,ON
OUTRES,ALL,ALL
KBC,1
LSWRITE,2
SAVE
LSSOLVE,1,2
FINISH
/POST26
NSOL,2,3289,TEMP
PLVAR,2
/POST1
SET,,,1,,10000
PLNSOL,TEMP
PLNSOL,TG,SUM
/EXIT,ALL