*HEADING
 SIMPLE SHEAR -- S4R ELEMENTS TESTED TO 300 PERCENT SHEAR
**
*NODE, NSET=QA_TEST_ALLNODES
501,6.0,0.
502,7.0,0.
503,7.0,1.
504,6.0,1.
505,6.0,2.
506,7.0,2.
507,7.0,3.
508,6.0,3.
*NSET,NSET=FIX
501,502,506,507
*NSET,NSET=XSHEAR
503,504
*NSET,NSET=YSHEAR
505,508
*NSET,NSET=NOUT
504,505
*ELEMENT,TYPE=S4R,ELSET=SHELL
 5, 501,502,503,504
10, 505,506,507,508
*SHELL SECTION,ELSET=SHELL,MATERIAL=MAT,SECTION INTEGRATION=GAUSS
.01, 
*MATERIAL,NAME=MAT
*DENSITY
1.346E-4, 
*ELASTIC
1.,0.
*BOUNDARY
FIX,1,3
XSHEAR,2,3
YSHEAR,1,1
YSHEAR,3,3
*RESTART,WRITE,NUMBER INTERVAL=2,TIMEMARKS=NO
**
*ELSET,ELSET=QA_TEST_ALLELEMS
SHELL,
**
*NSET, NSET=QA_TEST_ALLNODES
QA_TEST_ALLNODES, FIX, XSHEAR, YSHEAR
NOUT, 
**
*STEP
*DYNAMIC,EXPLICIT
,1.5
*BOUNDARY,TYPE=VELOCITY
XSHEAR,1,1,4.0
YSHEAR,2,2,4.0
***OUTPUT,HISTORY,TIME INTERVAL=.0015
***ENERGY OUTPUT
**ALLKE,ALLIE,ALLSE,ALLAE,ALLVD,ALLWK,ETOTAL,DT
***ELEMENT OUTPUT,ELSET=SHELL
**S,LE
***NODE OUTPUT,NSET=NOUT
**U,
*FILE OUTPUT,NUMBER INTERVAL=1,TIMEMARKS=YES
*EL FILE
SP,LE,NE,
*NODE FILE
U, 
*OUTPUT, FIELD, NUMBER INTERVAL=1, TIMEMARKS=YES
*ELEMENT OUTPUT, ELSET=QA_TEST_ALLELEMS
SP,LE,NE,
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
U, 
*OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=1.5
*END STEP