*HEADING
: Two-layer viscoplasticity, Strain Viscous Law, Uses *plastic,hardening=kine,
: Strain controlled cyclic loading: C3D8R
: CETOL is simply used as a mechanism to limit total number of
: increments (actual value makes very small difference in results)
*NODE,NSET=ALLN
1,0.,0.,0.
2,1.,0.,0.
3,1.,1.,0.
4,0.,1.,0.
5,0.,0.,1.
6,1.,0.,1.
7,1.,1.,1.
8,0.,1.,1.
*NSET,NSET=PULL
5,6,7,8
*ELEMENT,TYPE=C3D8R,ELSET=ALLE
1,1,2,3,4,5,6,7,8
*SOLID SECTION,ELSET=ALLE,MATERIAL=ALLE
*MATERIAL,NAME=ALLE
*ELASTIC
20.0E6, 0.3
*PLASTIC,HARDENING=KINEMATIC
200.,0.
220.,0.0009
*VISCOUS,LAW=STRAIN
1.0e-6,1.,0.,0.25
*BOUNDARY
1,PINNED
2,2
5,2
6,2
4,1
5,1
8,1
2,3
3,3
4,3
*STEP, INC=300, AMP=RAMP
*VISCO, CETOL=1.0e-4
0.01,2.
*BOUNDARY
PULL,3,3,2.e-4
*EL FILE,FREQ=5
S,
PS,
VS,
PE,
E,
VE,
EE,
*ENERGY FILE,FREQ=5
*NODE FILE, FREQ=5
U,RF
*EL PRINT
S,
E,
PE,
*OUTPUT,HISTORY
*ELEMENT OUTPUT,ELSET=ALLE
S
E
VS
*OUTPUT,FIELD,FREQUENCY=0
*END STEP
*STEP, INC=300,AMP=RAMP 
*VISCO, CETOL=1.0e-4
0.01,2.
*BOUNDARY
PULL,3,3,0.
*END STEP
*STEP, INC=300, AMP=RAMP
*VISCO, CETOL=1.0e-4
0.01,2.
*BOUNDARY
PULL,3,3,-2.e-4
*END STEP
*STEP, INC=300, AMP=RAMP
*VISCO, CETOL=1.0e-4
0.01,2.
*BOUNDARY
PULL,3,3,0.
*END STEP
*STEP, INC=300, AMP=RAMP
*VISCO, CETOL=1.0e-4
0.01,2.
*BOUNDARY
PULL,3,3,2.e-4
*END STEP
*STEP, INC=300, AMP=RAMP
*VISCO, CETOL=1.0e-4
0.01,2.
*BOUNDARY
PULL,3,3,0.
*END STEP