*HEADING
AXISYMMETRIC UPSETTING PROBLEM -- SLOW CASE         
-- COUPLED TEMPERATURE-DISPLACEMENT ANALYSIS (SLOW UPSETTING)
*PREPRINT,ECHO=YES,MODEL=YES,HISTORY=YES
*RESTART,WRITE,FREQUENCY=30
*NODE,NSET=RSNODE
9999,0.,.015
*NODE
1,
13,.01
1201,0.,.015
1213,.01,.015
**
9001,0.,.015
9013,.02,.015
9101,0.,.016
9113,.02,.016
*NGEN
9001,9013
9101,9113
*NGEN,NSET=MIDDLE
1,13
*NGEN,NSET=TOP
1201,1213
*NSET,NSET=TOPBND,GENERATE
1201,1212,1
*NFILL
MIDDLE,TOP,12,100
*NSET,NSET=AXIS,GENERATE
1,1101,100
*ELEMENT,TYPE=CAX8RT,ELSET=METAL
1,1,3,203,201,2,103,202,101
*ELGEN,ELSET=METAL
1,6,2,1,6,200,100
*ELSET,ELSET=ESID,GENERATE
6,506,100
*ELSET,ELSET=ETOP,GENERATE
501,506,1
*ELSET,ELSET=ETOP_1,GENERATE
502,506,1
*SURFACE,NAME=ASURF
ESID,S2
ETOP_1,S3
*SURFACE,TYPE=NODE,NAME=CENTER
1201,2.08333E-09
1202,5.81776E-06
*ELEMENT,TYPE=CAX4T,ELSET=PLATTEN
9001,9001,9013,9113,9101
*SURFACE,NAME=BSURF
PLATTEN,S1
*RIGID BODY,ELSET=PLATTEN,ISOTHERMAL=YES,REF NODE=9999
*CONTACT PAIR,INTERACTION=SMOOTH
ASURF,BSURF
CENTER,BSURF
*ELSET,ELSET=METAL2
METAL,PLATTEN
*SOLID SECTION,ELSET=METAL2,MATERIAL=EL
*MATERIAL,NAME=EL
*ELASTIC
200.E9,.3
*PLASTIC
7.E8,0.00
3.7E9,10.0
*RATE DEPENDENT
40.,5.
*SPECIFIC HEAT
586., 
*DENSITY
7833., 
*CONDUCTIVITY
52., 
*EXPANSION
1.2E-5, 
*INELASTIC HEAT FRACTION
0.9, 
*SURFACE INTERACTION,NAME=SMOOTH
*SURFACE BEHAVIOR,NO SEPARATION
*FRICTION,ROUGH
*BOUNDARY
MIDDLE,2
AXIS,1
*STEP,INC=200,AMPLITUDE=RAMP,NLGEOM
*COUPLED TEMPERATURE-DISPLACEMENT,DELTMX=100.
1.5,100.,5.E-8,5.0
*BOUNDARY
RSNODE,1,1
RSNODE,6,6
RSNODE,2,,-.009
*PRINT,CONTACT=YES
*CONTACT PRINT,SLAVE=ASURF,FREQUENCY=100
*CONTACT FILE,SLAVE=ASURF,FREQUENCY=200
*MONITOR,NODE=9999,DOF=2
*EL PRINT, ELSET=METAL,FREQUENCY=100
S,MISES
E,PEEQ
*NODE PRINT,FREQUENCY=25
U,RF,NT,RFL
*NODE FILE,NSET=RSNODE
RF, 
*NODE FILE,FREQUENCY=200
NT, 
*END STEP