*HEADING
 TIE C3D8RT ELEMENT TO A SOLID SURFACE IN
 A COUPLED THERMAL-STRESS ANALYSIS
 FILE NAME: XTIE_XPL_SOLID_COUPLE
*PREPRINT,MODEL=YES,HISTORY=YES, ECHO=YES
*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,2.02,-.3,.3
2006,2.02,-.3,-1.3
2103,2.02,1.3,.3
2106,2.02,1.3,-1.3
*ELEMENT,TYPE=C3D8RT,ELSET=WALLELEM
1001, 1003,2003,2006,1006, 1103,2103,2106,1106
*NSET,NSET=LEFT
1,101,4,104
*ELEMENT,TYPE=C3D8RT,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,TYPE=ORTHOTROPIC
1.E5,0.0,1.E5,0.0,0.0,1.E5,0.0,0.0,
0.0,       
*EXPANSION,TYPE=ORTHO
1.E-5,0.0,0.0
*CONDUCTIVITY
1., 
*DENSITY
1., 
*SPECIFIC HEAT
1., 
*SOLID SECTION,ELSET=ROD,MATERIAL=A1
1., 
*MATERIAL,NAME=A1
*ELASTIC
1.E5, 
*EXPANSION
1.E-5, 
*CONDUCTIVITY
1., 
*DENSITY
1., 
*SPECIFIC HEAT
1., 
*NSET, NSET=WALL
2003,2006,2103,2106
*NSET, NSET=QA_TEST
WALL, WALLNODE,BAR
*SURFACE, TYPE=ELEMENT,NAME=WALL
WALLELEM,S6
*SURFACE,TYPE=ELEMENT,NAME=RIGHT
2,S4
*TIE,NAME=TIE
RIGHT,WALL
*NSET,NSET=EDGE
1,2,101,102
*BOUNDARY
EDGE,2,3
LEFT,1
WALL,1,6
*AMPLITUDE, NAME=AMP
0.0,0.0,1.0,1.0
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
,1.
*BOUNDARY,AMPLITUDE=AMP
LEFT,11,11,400.
WALL,11,11,200.
*OUTPUT,FIELD,VARIABLE=PRESELECT,NUMBER=5
*NODE OUTPUT
NT,
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT,NSET=QA_TEST
NT,
**NT,U
***FILE OUTPUT,NUM=1
***NODE FILE
**U, 
**NT, 
***EL FILE,ELSET=ROD
**S,
**OUTPUT, HISTORY,FREQ=1
***NODE OUTPUT, NSET=BAR
**U,NT
***NODE OUTPUT,NSET=WALL
**U,NT 
***NODE OUTPUT,NSET=WALLNODE
**U,NT 
***ENERGY OUTPUT
**ALLIE,ALLKE,ALLAE,ALLWK,ETOTAL,ALLIHE,ALLHF
***OUTPUT,HISTORY,VARIABLE=PRESELECT,FREQ=1
*END STEP