*HEADING
NECKING OF A ROUND TENSILE BAR                              
*RESTART,WRITE,FREQUENCY=100
*NODE
201 ,0.  ,.03
221 ,1.  ,.03
6601,0.  ,4.
6621,1.  ,4.
1   ,0.  ,0.
20  ,.95 ,0.
21  ,.995,0.
101 ,0.  ,.0145
120 ,.95 ,.0145
121 ,.99742,.0145
*NGEN,NSET=BOT3
201,221
*NGEN,NSET=TOP
6601,6621
*NGEN,NSET=BOT1
1,20
*NSET,NSET=BOT
BOT1,21
*NGEN
101,120
*NFILL,NSET=NALL,BIAS=0.965
BOT3,TOP,64,100
*NSET,NSET=LEFT,GENERATE
1,6601,100
*ELEMENT,TYPE=CAX8R
1, 1,3,203,201,2,103,202,101
*ELGEN,ELSET=EALL
1, 10,2,1, 33,200,100
*SOLID SECTION,MATERIAL=MAT1,ELSET=EALL
*MATERIAL,NAME=MAT1
*ELASTIC
300.,.3
*PLASTIC
  0.1000000E+01,  0.0000000E+00
  0.1050000E+01,  0.1672360E-02
  0.1100000E+01,  0.4315249E-02
  0.1150000E+01,  0.8364930E-02
  0.1200000E+01,  0.1442054E-01
  0.1250000E+01,  0.2329371E-01
  0.1300000E+01,  0.3607014E-01
  0.1350000E+01,  0.5418546E-01
  0.1400000E+01,  0.7951777E-01
  0.1420000E+01,  0.9219483E-01
  0.1440000E+01,  0.1065927E+00
  0.1460000E+01,  0.1229152E+00
  0.1480000E+01,  0.1413866E+00
  0.1500000E+01,  0.1622540E+00
  0.1520000E+01,  0.1857891E+00
  0.1539999E+01,  0.2122898E+00
  0.1559999E+01,  0.2420833E+00
  0.1579999E+01,  0.2755272E+00
  0.1599999E+01,  0.3130133E+00
  0.1649999E+01,  0.4273178E+00
  0.1699999E+01,  0.5774848E+00
  0.1749999E+01,  0.7731771E+00
  0.1794999E+01,  0.9979820E+00
*POROUS METAL PLASTICITY,RELATIVE DENSITY=1.
1.5,1.,2.25
*VOID NUCLEATION
.3,.1,.04
*STEP,INC=400,NLGEOM
*STATIC
.001,1.5,,.03
*BOUNDARY
BOT, 2,2,
LEFT,1,1,
TOP,2,2,.76
*CONTROLS, PARAMETERS=FIELD

,0.0,
*ENERGY PRINT,FREQUENCY=200
*ELPRINT,FREQUENCY=0
*NODEPRINT,FREQUENCY=0
*NODEFILE,NSET=TOP 
U, 
RF, 
*OUTPUT,FIELD
*NODE OUTPUT,NSET=TOP
U,
RF,
*OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,FIELD
*ELEMENT OUTPUT
VVF,VVFN,VVFG
*OUTPUT,HISTORY
*NODE OUTPUT,NSET=TOP
U,
RF,
*ENDSTEP
*STEP,INC=400,NLGEOM
*STATIC
.001,.1,,.03
*BOUNDARY
TOP,2,2,.79
*ENERGY PRINT,FREQUENCY=200
*ELPRINT,FREQUENCY=0
*NODEPRINT,FREQUENCY=0
*NODEFILE,NSET=TOP
U, 
RF, 
*ENDSTEP