/PREP7  
et,1,plane55 
mp,kxx,1,0.6
mptemp,1,-10,-1,0,10
mpdata,enth,1,1,0,37.8e6,79.8e6,121.8e6 
mpplot,enth,1   
rect,0,0.01,0,0.001 
aplot   
/pnum,line,1
lplot   
lesize,1,,,20   
lesize,2,,,1
eshape,2
amesh,1 
fini
/solu   
antype,trans
time,1000   
autots,on   
deltime,2,1,100 
outres,,1   
tunif,2 
nsel,s,loc,x,0  
d,all,temp,-5   
nsel,all
kbc,1   
solve   
fini
/post26 
/pnum,node,1
nplot   
nsol,2,1,temp,,Ti   
nsol,3,5,temp   
nsol,4,8,temp   
nsol,5,11,temp  
nsol,6,16,temp  
nsol,7,2,temp,,Ta   
plvar,2,3,4,5,6,7   
fini