*HEADING
 ROTATING CYLINDER PROBLEM -- 2D CASE ONLY
**
*NODE
*NGEN,LINE=C,NSET=PE
*NGEN,LINE=C,NSET=PE
*ELEMENT,TYPE=CPE4R,ELSET=PE
*ELGEN,ELSET=PE
*SOLID SECTION,ELSET=PE,MATERIAL=MAT,ORIENTATION=PE
*EQUATION
*MPC
SLIDER,  1,101,99
SLIDER, 10,110,99
*BOUNDARY
99,1,2
*INITIAL CONDITIONS,TYPE=ROTATING VEL
PE,4000., 0.,0.,0.
0.,0.,0., 0.,0.,1.
*ORIENTATION,NAME=PE,SYSTEM=CYLINDRICAL
**
*MATERIAL,NAME=MAT
*ELASTIC
1.03E7,.33333
*PLASTIC
4.15E4,0.
521.15E4,10.
*DENSITY
2.508E-4,
**
*NODE
*NGEN,LINE=C,NSET=UMAT
*ELEMENT,TYPE=CPE4R,ELSET=UMAT
*ELGEN,ELSET=UMAT
*ELSET,ELSET=QA_TEST
UMAT,
*SOLID SECTION,ELSET=UMAT,MATERIAL=ABQTEST1,ORIENTATION=UMAT
*MATERIAL,NAME=ABQTEST1
*USER MATERIAL,CONSTANTS=4
*DENSITY
2.508E-4,
*DEPVAR
*EQUATION
*MPC
SLIDER,301,401,399
SLIDER,310,410,399
*BOUNDARY
399,1,2
*INITIAL CONDITIONS,TYPE=ROTATING VEL
UMAT,4000., 0.,0.,0.
0.,1.5,0., 0.,1.5,1.
*ORIENTATION,NAME=UMAT,SYSTEM=CYLINDRICAL
**
*STEP
*DYNAMIC,EXPLICIT
,.15E-3
*DLOAD
 PE,P4,9760.
 UMAT,P4,9760.
**
*FILE OUTPUT,NUMBER INTERVAL=2,TIME MARKS=YES
*EL FILE
 PEEQ,
 MISES,
 PE,
 SDV
*NODE FILE
 U,
**
*OUTPUT,FIELD,NUMBER INTERVAL=5
*ELEMENT OUTPUT
 PEEQ,S,PE,SDV
*NODE FILE
 U,
*********QA_TEST**************
*OUTPUT,FIELD,NUMBER INTERVAL=2
*ELEMENT OUTPUT,ELSET=QA_TEST
 PEEQ,
*OUTPUT,HISTORY,TIME INTERV=7.5e-3
*ENERGY OUTPUT,VAR=ALL
******************************
*END STEP