*HEADING
: THERMALLY COUPLED CONTACT -- INTERFACE RADIATION
*RESTART,WRITE,F=2
*NODE,NSET=ALL
  1, 1., 0.,-0.01
  7, 7., 0.,-0.01
 11, 1., 1.,-0.01
 17, 7., 1.,-0.01
 21, 1., 0., 1.01
 27, 7., 0., 1.01
 31, 1., 1., 1.01
 37, 7., 1., 1.01
101, 3., 1.
105, 5., 1.
111, 3., 2.
115, 5., 2.
121, 3., 1., 1.0
125, 5., 1., 1.0
131, 3., 2., 1.0
135, 5., 2., 1.0
*NGEN
  1,  7
 11, 17
 21, 27
 31, 37
101,105
111,115
121,125
131,135
*NSET,NSET=BOT,GEN
1,7
21,27
*NSET,NSET=TOP,GEN
111,115
131,135
*NSET,NSET=QA_TEST
TOP,BOT
**
*ELEMENT,TYPE=C3D8T,ELSET=DEAD
1,1,3,13,11,21,23,33,31
2,3,5,15,13,23,25,35,33
3,5,7,17,15,25,27,37,35
*SOLID SECTION,ELSET=DEAD,MATERIAL=DEAD
*MATERIAL,NAME=DEAD
*ELASTIC
30.E6,.3
*CONDUCTIVITY
10.000, 
*SPECIFIC HEAT
0.001, 
*DENSITY
1000., 
**
*ELEMENT,TYPE=C3D8T,ELSET=ACTIVE
101,101,103,113,111,121,123,133,131
102,103,105,115,113,123,125,135,133
*SOLID SECTION,ELSET=ACTIVE,MATERIAL=ACTIVE
*MATERIAL,NAME=ACTIVE
*ELASTIC
30.E6,.3
*CONDUCTIVITY
10.000, 
*SPECIFIC HEAT
0.001, 
*DENSITY
1000., 
*surface, NAME=SECONDARY
ACTIVE, S3
*surface, NAME=MAIN
DEAD, S5
*CONTACT PAIR, INTERACTION=SLIDE
SECONDARY, MAIN
*SURFACE INTERACTION, NAME=SLIDE
*GAP RADIATION
.74074,.74074
1.,0.
1.,1.
** converted from old data: 1.E-6, 1.E-6
*GAP HEAT GENERATION
0.0, 
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-273.16,STEFANB=1.7E-6
**
*AMPLITUDE, NAME=SLIDE, VALUE=RELATIVE, TIME=STEP
100., 0.0,  200., 1.0,  400., 0.0,  600., -1.0
800., 0.0,  1000., 0.0
*AMPLITUDE, NAME=REMOVE, VALUE=RELATIVE, TIME=STEP
0.0, 1.0,  30.0, 0.0,  100.0, 0.0
**
*INITIAL CONDITIONS,TYPE=TEMP
ALL,0.0
*********************************************************
*STEP,INC=50,NLGEOM,AMP=RAMP,UNSYMM=YES
Step 1
*COUPLED TEMPERATURE,DELTMX=100.
1.,10.
*CONTROLS,PARAMETERS=FIELD
1.0E-6, 
*BOUNDARY
BOT,2,3
TOP,3,3
1,1,1
7,1,1
21,1,1
27,1,1
113,1,1
133,1,1
*DLOAD
101,P5,100.
102,P5,100.
*DFLUX
101,S5,100.
102,S5,100.
*FILM
2,F3,0.,10.
**
*NODE PRINT,frequency=10
RF,NT11,RFL
*EL PRINT,frequency=10
S, 
E, 
TEMP,HFL
NFLUX, 
*EL FILE,frequency=10
S,E,TEMP
NFLUX, 
*NODE FILE,frequency=10
NT,RFL
*CONTACT FILE,NSET=QA_TEST,frequency=10
CSTRESS,CDISP
CAREA, 
CFN,CFS
CMN,CMS
CFT,CMT
*OUTPUT,FIELD,frequency=10
*CONTACT OUTPUT,NSET=QA_TEST
CSTRESS,CDISP
*ELEMENTOUTPUT
S,E,TEMP
NFLUX, 
*NODE OUTPUT
NT,RFL
*PRINT,CONTACT=YES
*END STEP
**
*STEP,INC=50,NLGEOM,AMP=RAMP
Step 2
*COUPLED TEMPERATURE,DELTMX=100.
100.,1000.,,100.
*BOUNDARY,FIXED
TOP,2,2
*BOUNDARY,AMPLITUDE=SLIDE
113,1,1, 1.5
133,1,1, 1.5
*END STEP
**
*STEP,INC=50,NLGEOM
Step 3
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
100000.,100000.
*SOLUTION TECHNIQUE,TYPE=SEPARATED
*BOUNDARY,OP=NEW
BOT,2,3
TOP,3,3
1,1,1
7,1,1
21,1,1
27,1,1
113,1,1
133,1,1
*CONTACT FILE,NSET=QA_TEST,frequency=0
*OUTPUT,FIELD,frequency=0
*CONTACT OUTPUT,NSET=QA_TEST
*NODE OUTPUT
*ELEMENTOUTPUT
*END STEP
**
*STEP,INC=50,NLGEOM
Step 4
*COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE
100000.,100000.
*DLOAD
101,P5,200.
102,P5,200.
*BOUNDARY
113,1,1,0.0
133,1,1,0.0
*CONTACT FILE,NSET=QA_TEST,frequency=10
CSTRESS,CDISP
*OUTPUT,FIELD,frequency=10
*CONTACT OUTPUT,NSET=QA_TEST
CSTRESS,CDISP
*ELEMENTOUTPUT
S,E,TEMP
NFLUX, 
*NODE OUTPUT
NT,RFL
*END STEP
**
*STEP,INC=50,NLGEOM,AMP=RAMP
Step 5
*COUPLED TEMPERATURE-DISPLACEMENT,DELTMX=100.
10.0, 100.0
*DFLUX, AMP=REMOVE
101, S5, 100.0
102, S5, 100.0
*BOUNDARY
113, 1,1, 10.0
133, 1,1, 10.0
*BOUNDARY,FIXED
TOP,2,2
*END STEP