*HEADING
 SIMPLE SHEAR -- M3D4R ELEMENT TYPE TESTED TO 300 PERCENT SHEAR
**
**Analytical solution provided by Dienes (1979):
**S11=4*mu*(cos(2*beta)*ln(cos(beta))+beta*sin(2*beta)-sin^2(beta))
**S12=2*mu*cos(2*beta)*(2*beta-2*tan(2*beta)*ln(cos(beta)-tan(beta))
**where tan(beta)=gamma
**
*NODE, Nset=ODB_NSET
401,4.5,0.
402,5.5,0.
403,5.5,1.
404,4.5,1.
405,4.5,2.
406,5.5,2.
407,5.5,3.
408,4.5,3.
*NSET,NSET=FIX
401,402,406,407
*NSET,NSET=XSHEAR
403,404
*NSET,NSET=YSHEAR
405,408
*NSET,NSET=NOUT
404,405
*ELEMENT,TYPE=M3D4R,ELSET=MEMBRANE
4, 401,402,403,404
9, 405,406,407,408
*MEMBRANE SECTION,ELSET=MEMBRANE,MATERIAL=MAT
.01, 
*MATERIAL,NAME=MAT
*DENSITY
1.346E-4, 
*ELASTIC
1.,0.
*ELSET,ELSET=EALL
MEMBRANE,
*BOUNDARY
FIX,1,3
XSHEAR,2,3
YSHEAR,1,1
YSHEAR,3,3
*RESTART,WRITE,NUMBER INTERVAL=2,TIMEMARKS=NO
**
** Sets added by addodb
**
*Elset,Elset=ODB_ESET
MEMBRANE,
**
**
*Nset, Nset=ODB_NSET
ODB_NSET, FIX, XSHEAR, YSHEAR
NOUT, 
**
**
**
*ELSET,ELSET=QA_TEST_ALLELEMS
MEMBRANE,
**
*NSET, NSET=QA_TEST_ALLNODES
ODB_NSET, FIX, XSHEAR, YSHEAR
NOUT, ODB_NSET
**
*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=EALL
**S,LE
***NODE OUTPUT,NSET=NOUT
**U,
*FILE OUTPUT,NUMBER INTERVAL=1,TIMEMARKS=NO
*EL FILE
SP,LE,NE,
*NODE FILE
U, 
*OUTPUT, FIELD, OP=ADD, NUMBER INTERVAL=2, TIMEMARKS=NO
*ELEMENT OUTPUT
ELEN,
S,SP,LE,LEP,NE,NEP,PRESS,
*NODE OUTPUT
U, 
*OUTPUT, HISTORY, TIME INTERVAL=0.75
*ELEMENT OUTPUT, Elset=ODB_ESET
ELEN,
S,SP,LE,LEP,NE,NEP,PRESS,
*NODE OUTPUT, Nset=ODB_NSET
U, 
*ENERGY OUTPUT,VARIABLE=ALL
*OUTPUT, FIELD, NUMBER INTERVAL=1, TIMEMARKS=NO
*ELEMENT OUTPUT, ELSET=QA_TEST_ALLELEMS
SP,LE,NE,
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
U, 
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=1.5
*END STEP