*HEADING
 TEST CLEARANCE  DEPENDENT GAP RADIATION (C3D8T)
 PENALTY CONTACT    
*PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN=1.E-8
*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
1003, 1.01,1.1,0.1
1004, 1.01,-0.1,0.1
1005, 1.01,-.1,-1.1
1006, 1.01,1.1,-1.1
*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
*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
*ELEMENT, TYPE=HEATCAP, ELSET=HCAP
9999,9999
*ELEMENT,ELSET=RIGID,TYPE=R3D4
1001,1003,1004,1005,1006
*RIGID BODY, REF NODE=9999,ELSET=RIGID,ISOTHERMAL=YES
*HEATCAP, ELSET=HCAP
1.0,
*SURFACE,TYPE=ELEMENT,NAME=RIGHT
2,S4
*SURFACE,TYPE=ELEMENT,NAME=WALL
RIGID,SNEG
*AMPLITUDE,NAME=RAMP,DEFINITION=SMOOTH
0,0,3,1
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
 ,5.
*CONTACT PAIR,INTERACTION=GAP,WEIGHT=0.0,MECHANICAL CONSTRAINT=PENALTY,
CPSET=C1
RIGHT,WALL
*CONTACT CONTROLS,CPSET=C1,SCALE PENALTY=0.5
*SURFACE INTERACTION,NAME=GAP
*GAP RADIATION
1.0,1.0
1.,0.
0.,0.02
*BOUNDARY,TYPE=VELOCITY
BAR,2
LEFT,1
WALL,1,6
*BOUNDARY,AMP=RAMP
LEFT,11,11,400.
WALL,11,11,200.
*OUTPUT,FIELD,NUM=1
*ELEMENT OUTPUT,ELSET=ROD
S,LE
*OUTPUT, HISTORY,FREQ=20
*NODE OUTPUT, NSET=BAR
U,NT
** *NODE OUTPUT,NSET=WALL
** U, 
*ENERGY OUTPUT,ELSET=ROD
ALLIE,ALLKE,ALLAE
**
** Output requests for qa testing
**
*NSET,NSET=QA_TEST
BAR, 9999
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT,NSET=QA_TEST
U, NT
*OUTPUT,HISTORY,VAR=PRESELECT,TIME INTERVAL=1.25
*FILE OUTPUT,NUM=1
*NODE FILE
U, 
NT, 
*END STEP