*HEADING
 Transfer from Standard to Standard : Test for S4R element 
 - Standard analysis
 - loading in shear
 - with orientation
*NODE,NSET=ALL
 1,
 2, 2., 0.
 3, 0., 2.
 4, 2., 2.
*NSET,NSET=SIDE
 3,4
*NODAL THICKNESS
1, 0.002
2, 0.002
3, 0.002
4, 0.002
*ORIENTATION,NAME=ORIE
1.0,1.0,0,-1.0,1.0,0
3,0.0
*ELEMENT, TYPE=S4R, ELSET=SHELL
 10, 1,2,4,3
*SHELL SECTION,ELSET=SHELL,MATERIAL=STEEL,ORIENTATION=ORIE,POISSON=0.3,NODAL THICKNESS
 0.002, 
*MATERIAL,NAME=STEEL
*ELASTIC, TYPE=ENGINEERING CONSTANTS
2.0E11, 1.0E11, 1.0E11, 0.3,0.23,0.34, 7.69E10, 7.69E10
9.0E9, 
*DENSITY
7850.0, 
*BOUNDARY
 ALL, 3,3
all, 6, 6
 1, 1,2
 2, 1,2
 3, 2,2
 4, 2,2
*RESTART,WRITE
**
**
*ELSET,ELSET=QA_TEST_ALLELEMS
SHELL,
**
*NSET, NSET=QA_TEST_ALLNODES
ALL, SIDE
**
*FILE FORMAT, ZERO INCREMENT
*STEP,NLGEOM,INC=100
*DYNAMIC
0.01,0.1
*BOUNDARY, TYPE=VELOCITY
 3, 1, 1, 2.
 4, 1, 1, 2.
*OUTPUT, FIELD,FREQ=1
*ELEMENT OUTPUT, ELSET=QA_TEST_ALLELEMS
 S,LE
 STH,
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
 U,
 COORD,
*OUTPUT,FIELD,VARIABLE=PRESELECT,FREQ=1
*OUTPUT,HISTORY,VARIABLE=PRESELECT,FREQ=1
*END STEP
*STEP
*STATIC
0.1,1.0
*BOUNDARY, OP=MOD
 3, 1, 1, 0.3
 4, 1, 1, 0.3
*EL FILE,DIRECTIONS=YES
S,LE
SE,
SF,
STH,
*NODE FILE
COORD
*END STEP