*HEADING
THERMALLY COUPLED CONTACT, FINITE SLIDING CONTACT
WITH FRICTIONAL HEAT GENERATION , DEFORMABLE; PENALTY CONTACT
**
** See ch. 1.6.7 of ABAQUS/Verification Manual
**
*NODE,NSET=ALL
*NGEN,NSET=ALL
*NSET,NSET=QA_TEST
ALL,
*NSET,NSET=BOT,GEN
*NSET,NSET=TOP,GEN
**
*ELEMENT,TYPE=CPE3T,ELSET=DEAD
*SOLID SECTION,ELSET=DEAD,MATERIAL=DEAD
*MATERIAL,NAME=DEAD
*ELASTIC
30.E6,.3
*CONDUCTIVITY
10.000,
*SPECIFIC HEAT
0.001,
*DENSITY
1000.,
**
*ELEMENT,TYPE=CPE3T,ELSET=ACTIVE
*ELSET,ELSET=ETOP
*ELSET,ELSET=EBOT, GENERATE
*SOLID SECTION,ELSET=ACTIVE,MATERIAL=ACTIVE
*MATERIAL,NAME=ACTIVE
*ELASTIC
30.E6,.3
*CONDUCTIVITY
10.,
*DENSITY
1000.,
*SPECIFIC HEAT
.001,
**
*AMPLITUDE, NAME=SLIDE, VALUE=RELATIVE, TIME=STEP, DEFINITION=SMOOTH STEP
0.0, 0.0,  20., 1.0,  40., 0.0,  60., -1.0
80., 0.0,  100., 0.0
*AMPLITUDE, NAME=RAMP, DEFINITION=SMOOTH STEP
0.0,0.0,10.,1.0
**
*INITIAL CONDITIONS,TYPE=TEMP
ALL,20.0
**
*ELSET,ELSET=EALL
ACTIVE,DEAD
*NSET,NSET=CONST
*EQUATION
CONST,1,1.0,113,1,-1.0
CONST,2,1.0,113,2,-1.0
**
*SURFACE, NAME=ASURF
ETOP,S1
*SURFACE, NAME=BSURF
EBOT,S2
**
*STEP
STEP 1
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT, DIRECT
**
*CONTACT PAIR,INTERACTION=ROUGH,WEIGHT=0.0,MECHANICAL CONSTRAINT=PENALTY
ASURF,BSURF
*SURFACE INTERACTION,NAME=ROUGH
*FRICTION
0.1,
*GAP CONDUCTANCE,PRESSURE
*GAP HEAT GENERATION
**
*BOUNDARY, TYPE=VELOCITY, OP=NEW
BOT,2,2
1,1,1
7,1,1
113,1,1
*CLOAD,AMP=RAMP
113,2,-200.
*********************
*FILE OUTPUT,N=1
*NODE FILE,NSET=ALL
NT,
********************
*OUTPUT,FIELD,NUM=1
*NODE OUTPUT,NSET=QA_TEST
NT,
*NODE OUTPUT,NSET=ALL
U,
************
*CONTACT OUTPUT
CSTRESS,
*ELEMENT OUTPUT
S,
********************
***OUTPUT,HISTORY, FREQUENCY=500
***NODE OUTPUT,NSET=ALL
**U,NT
*******************
*OUTPUT,HISTORY, FREQUENCY=99999
*ENERGY OUTPUT,VAR=ALL
******************
*END STEP
**
*STEP
STEP 2 GENERATE 120 UNITS OF HEAT, 60 UNITS ABSORBED
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT,DIRECT
*BOUNDARY,AMPLITUDE=SLIDE, OP=MOD
113,1,1,1.5
*END STEP
**
*STEP
STEP 3 GO TO STEADY STATE - SHOULD GO TO TEMP =27.5
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT, DIRECT
*FIXED MASS SCALING, ELSET=EALL, FACTOR=1.E4
*END STEP