*HEADING
 CONTACT PROBLEM  -  RIGID SURFACE
*RESTART,WRITE
*NODE
*NODE,NSET=CPEGRN
*NODE,SYSTEM=C
*NGEN,LINE=C
*NGEN
*NSET,NSET=NY
*ELEMENT,TYPE=CPEG8
*ELGEN
*ELSET,ELSET=TOP
*ELSET,ELSET=BOT
*ELSET,ELSET=CYLINDER
TOP,BOT
*rigid body,analytical surface=BSURF,REF NODE=999
*surface,TYPE=SEGMENTS,NAME=BSURF
START,0.,-10.
LINE,4.,-10.
*surface,NAME=ASURF
BOT,S2
*CONTACT PAIR,INTERACTION=SMOOTH,SMALL SLIDING
ASURF,BSURF
*SURFACE INTERACTION,NAME=SMOOTH
*EQUATION
*MPC
QUADRATIC,82,81,83,85
QUADRATIC,84,81,83,85
QUADRATIC,122,121,123,125
QUADRATIC,124,121,123,125
QUADRATIC,126,125,127,129
QUADRATIC,128,125,127,129
QUADRATIC,130,129,131,133
QUADRATIC,132,129,131,133
QUADRATIC,149,129,169,209
QUADRATIC,189,129,169,209
*BOUNDARY
 NY,1
*SOLID SECTION,ELSET=CYLINDER,MATERIAL=A1, REFNODE=CPEGRN
1.,
*MATERIAL,NAME=A1
*ELASTIC
 30.E6,0.3
*STEP,INC=20
*STATIC,DIRECT
 1.,
*BOUNDARY
 1,2,2,-.4
999,1,6
CPEGRN,3,5
*CONTACT PRINT,SLAVE=ASURF
*CONTACT FILE,SLAVE=ASURF
*OUTPUT,FIELD
*CONTACT OUTPUT,VARIABLE=PRESELECT,SLAVE=ASURF
*END STEP