*HEADING TEST CLEARANCE DEPENDENT GAP RADIATION (CPE4RT) *PHYSICAL CONSTANTS, ABSOLUTE ZERO=-460., STEFAN=1.E-8 *NODE,NSET=BAR 1,0. 2,.5 3,1. 101,0.,1. 102,0.5,1. 103,1.0,1. *NSET,NSET=LEFT 1,101 *ELEMENT,TYPE=CPE4RT,ELSET=ROD 1,1,2,102,101 2,2,3,103,102 *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 *HEATCAP, ELSET=HCAP 1.0, *SURFACE,NAME=WALL,TYPE=S START,1.01,-0.1 LINE,1.01,1.1 *SURFACE,TYPE=ELEMENT,NAME=RIGHT 2,S2 *RIGID BODY, REFNODE=9999, ISOTHERMAL=YES, ANALYTICAL SURFACE=WALL *AMPLITUDE,NAME=RAMP,DEFINITION=SMOOTH 0,0,3,1 *STEP *DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT ,5. *CONTACT PAIR,INTERACTION=GAP,WEIGHT=0.0 RIGHT,WALL *SURFACE INTERACTION,NAME=GAP *GAP RADIATION 1.0,1.0 1.,0. 0.,0.02 *BOUNDARY,TYPE=VELOCITY BAR,2 LEFT,1 WALL,1,2,0.0 WALL,6,6,0.0 *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