*HEADING
 TIE C3D8T ELEMENT TO A RIGID SURFACE IN
 A COUPLED THERMAL-STRESS ANALYSIS
 File name: xtie_rigid_couple
*NODE,NSET=BAR
1, 0.,0.,0.
2, .5,0.,0.
3, 1.,0.,0.
4, 0.,0.,-1
5, 0.5,0.,-1
6, 1.,0.,-1
101, 0.,1.,0.
102, 0.5,1.,0.
103, 1.0,1.,0.
104, 0.,1.,-1
105, 0.5,1.,-1
106, 1.0,1.,-1
*node,nset=wallnode
1003, 1.01,-.3,.3
1006, 1.01,-.3,-1.3
1103, 1.01,1.3,.3
1106, 1.01,1.3,-1.3
2003, 1.02,-.3,.3
2006, 1.02,-.3,-1.3
2103, 1.02,1.3,.3
2106, 1.02,1.3,-1.3
*ELEMENT,TYPE=C3D8T,ELSET=wallelem
1001, 1003,2003,2006,1006, 1103,2103,2106,1106
*NSET,NSET=LEFT
1,101,4,104
*ELEMENT,TYPE=C3D8T,ELSET=ROD
1,1,2,5,4,101,102,105,104
2,2,3,6,5,102,103,106,105
**local orientation matching global system 
*ORIENTATION,NAME=RECT
 1.0, 0.0, 0.0, 0.0, 1.0, 0.0
 1, 0.0
*SOLID SECTION,ELSET=WALLELEM,MATERIAL=A2,ORIENT=RECT
1., 
*MATERIAL,NAME=A2
*ELASTIC
1.E5, 
*EXPANSION,type=ortho
1.E-5, 
*CONDUCTIVITY
1., 
*DENSITY
1., 
*SPECIFIC HEAT
1.e-6, 
*SOLID SECTION,ELSET=ROD,MATERIAL=A1
1., 
*MATERIAL,NAME=A1
*ELASTIC
1.E5, 
*EXPANSION
1.E-5, 
*CONDUCTIVITY
1., 
*DENSITY
1., 
*SPECIFIC HEAT
1., 
*NODE, NSET=WALL
9999,2.,0.5
*SURFACE, type=element,NAME=WALL
wallelem,s6
*SURFACE,TYPE=ELEMENT,NAME=RIGHT
2,S4
*RIGID BODY, REFNODE=9999, ISOTHERMAL=YES, elset=wallelem
*tie,name=tie
RIGHT,WALL
*nset,nset=edge
1,2,101,102
*BOUNDARY
edge,2,3
LEFT,1
WALL,1,6
*STEP
*COUPLED TEMPERATURE-DISPLACEMENT, steady state
1.,1.
*BOUNDARY
LEFT,11,11,400.
WALL,11,11,200.
*OUTPUT,FIELD,VARIABLE=PRESELECT,freq=5
*ELEMENT OUTPUT,ELSET=ROD
S,
***FILE OUTPUT,NUM=1
*NODE FILE,freq=5
U, 
NT, 
*EL FILE,ELSET=ROD,freq=5
S,
*OUTPUT, HISTORY,FREQ=5
*NODE OUTPUT, NSET=BAR
U,NT
*NODE OUTPUT,NSET=WALL
U, 
*ENERGY OUTPUT
ALLIE,ALLKE,ALLAE
*END STEP