*HEADING
: SIMPLE CONTACT TEST, FINITE SLIDING CONTACT WITHOUT FRICTION, RIGID 
** Contact Features Tested: 
**	*FRICTION, *CHANGE FRICTION (mu=0 and mu=0.3)
*NODE
1, 0.5, 0.
2, 5.5, 0.
3, 0.5, 5.
4, 5.5, 5.
1000, 0., 0.
*ELEMENT,TYPE=CAX4,ELSET=SOLID
1, 1,2,4,3
*SOLID SECTION,ELSET=SOLID,MATERIAL=SOLMAT
*MATERIAL,NAME=SOLMAT
*ELASTIC
30.E6,.3
*DENSITY
10., 
*DAMPING, ALPHA=0.1
*rigid body,analytical surface=BSURF,REFNODE=1000
*surface,TYPE=SEGMENTS,NAME=BSURF
START,0. , 0.
LINE, 6. , 0.
*surface,NAME=ASURF
SOLID,S1
*CONTACT PAIR,INTERACTION=SMOOTH
ASURF,BSURF
*SURFACE INTERACTION,NAME=SMOOTH
*FRICTION
0.0, 
*EQUATION
2, 
3,2,1., 4,2,-1.
*BOUNDARY
1,1
3,1
1000,1,2
1000,6
*STEP
*STATIC
*CONTACT PRINT,SLAVE=ASURF
*EL PRINT
 S,
*NODE PRINT,FREQ=0
*DLOAD
1,P3,250.
*END STEP
*STEP,NLGEOM
  LARGE DISPLACEMENT ANALYSIS
*STATIC
.5,1.
*DLOAD
1,P3,250
*OUTPUT,FIELD
*NODE OUTPUT
U,
*ELEMENT OUTPUT
S,
*CONTACT OUTPUT,VARIABLE=PRESELECT,SLAVE=ASURF
*END STEP
**
** step 3: change surface friction
**
*STEP,NLGEOM
*STATIC
1.0,1.0
*CHANGE FRICTION,INTERACTION=SMOOTH
*FRICTION
0.3, 
*ENDSTEP
**
** step 4: slide to the left w/ friction
**
*STEP,NLGEOM
*STATIC
*BOUNDARY
3,1,,0.1
4,1,,0.1
*CONTACT PRINT,SLAVE=ASURF,MASTER=BSURF
*PRINT,CONTACT=YES
*ENDSTEP
**
** step 5: Steady state dynamics, direct analysis
**
*STEP
*STEADY STATE DYNAMICS,DIRECT
20,80,5
*DLOAD
 1,P3,250.
*BOUNDARY
1,1
3,1
1000,1,2
1000,6
*OUTPUT,FIELD
*NODE OUTPUT
U,
RF,
*ELEMENT OUTPUT
E,
S,
*CONTACT OUTPUT,VARIABLE=PRESELECT,SLAVE=ASURF
*END STEP
**
** step 6: frequency extraction ->all modes are extracted
**
*STEP
*FREQUENCY,EIGENSOLVER=LANCZOS
2,,,,
*BOUNDARY
 1,1
 3,1
 1000,1,2
 1000,6
*NODE PRINT,F=0
*EL PRINT,F=0
*END STEP
**
** step 7: complex eigenvalue extraction - tests modal analysis following
**         complex eigensolver
**
*STEP
*COMPLEX FREQUENCY
*END STEP
**
** step 8: Steady state dynamics, subspace projection
**
*STEP
*STEADY STATE DYNAMICS,SUBSPACE PROJECTION,INTERVAL=RANGE
20,80,5
*DLOAD
 1,P3,250.
*OUTPUT,FIELD
*NODE OUTPUT
U,
RF,
*ELEMENT OUTPUT
S,
E,
*CONTACT OUTPUT,VARIABLE=PRESELECT,SLAVE=ASURF
*END STEP