*HEADING
- AXISYMMETRIC UPSETTING PROBLEM
- WITH RIGID SURFACE
- SECTION CONTROLS USED (HOURGLASS=STIFFNESS)
- FAST UPSETTING
*NODE
*NGEN,NSET=MIDDLE
*NGEN,NSET=TOP
*NFILL
MIDDLE,TOP,12,100
*NSET, NSET=SIDE, GEN
*NSET,NSET=AXIS,GEN
*ELEMENT,TYPE=cax4rt,ELSET=BILLET
*ELGEN,ELSET=BILLET
*NODE, NSET=NRIGID
*SOLID SECTION,ELSET=BILLET,MATERIAL=METAL,CONTROL=B
*SECTION CONTROLS, HOURGLASS=STIFFNESS, NAME=B
*MATERIAL,NAME=METAL
*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
*BOUNDARY
MIDDLE,2
AXIS,1
2003,1
2003,3,6
*SURFACE, NAME = BILLET
TOP,S3
SIDE,S2
*SURFACE, NAME=RIGID, TYPE=SEGMENTS
START, 0.02,.015
LINE, 0.00,.015
*RIGID BODY, REF NODE=2003, ANALYTICAL SURFACE =RIGID
*ELSET,ELSET=TOP,GEN
*ELSET,ELSET=SIDE,GEN
*NSET, NSET=QA_TEST
SIDE,
*NSET, NSET=QA_TEST_NRIGID
NRIGID,
*ELSET, ELSET=QA_TEST
SIDE,
*STEP
*DYNAMIC TEMPERATURE-DISPLACEMENT, EXPLICIT
*FIXED MASS SCALING,ELSET=BILLET,FACTOR=1.E+4
*BOUNDARY,TYPE=VELOCITY
2003,2,,-9.e-2
*SURFACE INTERACTION,NAME=RIG_BILL
*FRICTION
 1.0,
*CONTACT PAIR,INTERACTION=RIG_BILL
RIGID,BILLET
*MONITOR,NODE=2003,DOF=2
*FILE OUTPUT,NUM=1
*EL FILE, ELSET=QA_TEST
PEEQ,
*NODE FILE, NSET=NRIGID
U, RF
*NODE FILE, NSET=QA_TEST
NT,
*OUTPUT,FIELD,NUM=1, TIME MARKS=YES
*ELEMENT OUTPUT, ELSET=QA_TEST
PEEQ,
*NODE OUTPUT, NSET=QA_TEST
U, NT
*NODE OUTPUT, NSET=QA_TEST_NRIGID
RF,
*******
*OUTPUT,FIELD,VAR=PRESELECT,NUM=5
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=NRIGID
U2,RF2
*ENERGY OUTPUT
ALLIE,ALLKE,ALLAE,ALLPD
*END STEP