*HEADING
AXISYMMETRIC UPSETTING PROBLEM -- ADIABATIC CASE
 -- STATIC ADIABATIC ANALYSIS
*RESTART,WRITE,FREQUENCY=5
*NODE,NSET=RSNODE
*NODE
*NGEN,NSET=MIDDLE
*NGEN,NSET=TOP
*NSET,NSET=TOPBND,GENERATE
*NFILL
MIDDLE,TOP,12,100
*NSET,NSET=AXIS,GENERATE
*ELEMENT,TYPE=CAX8R,ELSET=METAL
*ELGEN,ELSET=METAL
*SOLID SECTION,ELSET=METAL,MATERIAL=EL
*MATERIAL,NAME=EL
*ELASTIC
200.E9,.3
*PLASTIC
7.E8,0.00
3.7E9,10.0
*RATE DEPENDENT
*SPECIFIC HEAT
586.,
*DENSITY
7833.,
*CONDUCTIVITY
52.,
*EXPANSION
1.2E-5,
*INELASTIC HEAT FRACTION
**
** Contact Definition
**
*rigid body,analytical surface=DIE,REFNODE=9999
*surface,name=DIE,TYPE=SEGMENTS
START,.020,.015
LINE,-.001,.015
*SURFACE INTERACTION,NAME=COUPLED
*FRICTION,ROUGH
*SURFACE BEHAVIOR,NO SEPARATION
*ELSET,ELSET=ESID,GENERATE
*ELSET,ELSET=ETOP,GENERATE
*surface,NAME=BLANK
ESID,S2
ETOP,S3
*CONTACT PAIR,INTERACTION=COUPLED
BLANK,DIE
**
*BOUNDARY
MIDDLE,2
AXIS,1
*STEP,INC=200,AMPLITUDE=RAMP,NLGEOM
*STATIC, ADIABATIC
1.5E-3,.1,5.E-11,5.E-3
*BOUNDARY
RSNODE,1
RSNODE,6
RSNODE,2,,-.009
*PRINT,CONTACT=YES
*EL PRINT, ELSET=METAL,FREQUENCY=100
S,MISES
PEEQ,PENER,TEMP
*NODE PRINT, FREQUENCY=100
U,RF,NT
*CONTACT PRINT,SLAVE=BLANK,FREQUENCY=100
*NODE FILE,NSET=RSNODE
RF,
*OUTPUT,FIELD
*NODE OUTPUT,NSET=RSNODE
RF,
*CONTACT FILE,SLAVE=BLANK,FREQUENCY=100
*OUTPUT,FIELD,FREQ=100
*CONTACT OUTPUT,VARIABLE=PRESELECT,SLAVE=BLANK
*END STEP