!!! Plane 75 axisymmetric-harmonic thermal solid
fini
/clear
/filname,fin
/units,si
/prep7
antype,trans
et,1,75
mp,kxx,1,237
mp,dens,1,2702
mp,c,1,903
mp,hf,1,150
mp,kyy,1,237
rectng,0,0.002,0,0.04
lesize,1,,,2
lesize,2,,,8
eshape,2
amesh,1
eplot
/solu
outres,,all !!! No!! /outres,,all
!!outres,,last
outpr,,all
sfa,1,2,conv,150,25
sfa,1,3,conv,0,25
tunif,25
d,1,temp,85
d,2,temp,85
d,3,temp,85
autots,on
time,0.01
time,8 !8s
nsubst,80,80,40! process 80 steps
NEQIT,20
!trnopt,full
solve
FILE,'file','rst','.' !!!!
finish
/post26
STORE,MERGE !!!!
nsol,2,1,temp,,t1
nsol,3,17,temp,,t2
nsol,4,12,temp,,t3
/axlab,y,temp
plvar,2,3,4
fini |