*HEADING : THERMALLY COUPLED CONTACT, FINITE SLIDING CONTACT WITH INTERACE RADIATION, DEFORMABLE *RESTART,WRITE,F=2 *NODE,NSET=ALL 1, 1., 0. 7, 7., 0. 11, 1., 1. 17, 7., 1. 101, 3., 1. 105, 5., 1. 111, 3., 2. 115, 5., 2. *NGEN 1,7,1 11,17,1 101,105,1 111,115,1 *NSET,NSET=BOT,GEN 1,7,1 *NSET,NSET=TOP,GEN 111,115,1 ** *ELEMENT,TYPE=CPE4T,ELSET=DEAD 1,1,3,13,11 3,5,7,17,15 *SOLID SECTION,ELSET=DEAD,MATERIAL=DEAD *MATERIAL,NAME=DEAD *ELASTIC 30.E6,.3 *CONDUCTIVITY 10.000, *SPECIFIC HEAT 0.001, *DENSITY 1000., ** *ELEMENT,TYPE=CPE4T,ELSET=ACTIVE 2,3,5,15,13 101,101,103,113,111 102,103,105,115,113 *SOLID SECTION,ELSET=ACTIVE,MATERIAL=ACTIVE *MATERIAL,NAME=ACTIVE *ELASTIC 30.E6,.3 *CONDUCTIVITY 10., *DENSITY 1000., *SPECIFIC HEAT .001, ** *ELSET,ELSET=ETOP 101,102 *ELSET,ELSET=EBOT 1,2,3 *surface, NAME=ASURF ETOP,S1 *surface, NAME=BSURF EBOT,S3 *CONTACT PAIR,INTERACTION=ROUGH,SMOOTH=0.05 ASURF,BSURF *SURFACE INTERACTION, NAME=ROUGH *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 0.0, 0.0, 0.2, 1.0, 0.4, 0.0, 0.6, -1.0 0.8, 0.0, 1.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,2 1,1,1 7,1,1 113,1,1 *DLOAD 101,P3,100. 102,P3,100. *DFLUX 101,S3,100. 102,S3,100. *FILM 2,F1,0.,10. ** *CONTACT PRINT, SECONDARY=ASURF *CONTACT FILE, SECONDARY=ASURF,F=10 *NODE PRINT RF,NT11,RFL *EL PRINT S,E,TEMP HFL, NFLUX, *EL FILE,F=10 S,E,TEMP NFLUX, *NODE FILE,F=10 NT,RFL *PRINT,CONTACT=YES *END STEP ** *STEP,INC=50,NLGEOM,AMP=RAMP,UNSYMM=YES Step 2 *COUPLED TEMPERATURE,DELTMX=100. 100.,1000.,,100. *BOUNDARY,FIXED TOP,2,2 *BOUNDARY,AMPLITUDE=SLIDE 113, 1,1, 1.5 *END STEP ** *STEP,INC=50,NLGEOM,UNSYMM=YES Step 3 *COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE 100000.,100000. *BOUNDARY,OP=NEW BOT,2,2 1,1,1 7,1,1 113,1,1 *END STEP ** *STEP,INC=50,NLGEOM,UNSYMM=YES Step 4 *COUPLED TEMPERATURE-DISPLACEMENT,STEADY STATE 100000.,100000. *DLOAD 101,P3,200. 102,P3,200. *BOUNDARY,OP=NEW BOT,2,2 1,1,1 7,1,1 113,1,1 *END STEP ** *STEP,INC=50,NLGEOM,AMP=RAMP,UNSYMM=YES Step 5 *COUPLED TEMPERATURE-DISPLACEMENT,DELTMX=100. 10.0, 100.0 *AMPLITUDE, NAME=REMOVE, VALUE=RELATIVE, TIME=STEP 0.0, 1.0, 30.0, 0.0, 100.0, 0.0 *DFLUX, AMP=REMOVE 101, S3, 100.0 102, S3, 100.0 *BOUNDARY 113, 1,1, 10.0 *BOUNDARY,FIXED 111,2,2 113,2,2 115,2,2 *END STEP