*HEADING
 Transfer from Explicit to Standard : Test for S4R element 
 - Explicit analysis
 - loading in bending
*NODE,NSET=ALL
 1,
 2, 2., 0.
 3, 0., 2.
 4, 2., 2.
*NSET,NSET=SIDE
 3,4
*DISTRIBUTION TABLE,NAME=DISTTABLEORI
 COORD3D,COORD3D
*DISTRIBUTION,NAME=DISTORI,LOCATION=ELEMENT,TABLE=DISTTABLEORI
      ,1.,1.,0., -1.,1.,0.
 SHELL,1.,0.,0.,  0.,1.,0.
*DISTRIBUTION TABLE,NAME=DISTTABLEORIANGLE
 ANGLE
*DISTRIBUTION,NAME=DISTORIANGLE,LOCATION=ELEMENT,TABLE=DISTTABLEORIANGLE
      ,45.
 SHELL,0.
*ORIENTATION,NAME=ORI
 DISTORI
 3, DISTORIANGLE
*DISTRIBUTION TABLE, NAME=DISTTABLETHICK
 LENGTH
*DISTRIBUTION,NAME=DISTTHICK,LOCATION=ELEMENT,TABLE=DISTTABLETHICK
  ,1.
 SHELL,0.002
*ELEMENT, TYPE=S4R, ELSET=SHELL
 10, 1,2,4,3
*SHELL SECTION, ELSET=SHELL, MATERIAL=STEEL, SHELL THICKNESS=DISTTHICK,ORIENTATION=ORI
 1.
*MATERIAL,NAME=STEEL
*ELASTIC
 200.E9, 0.3
*DENSITY
 1000., 
*BOUNDARY
 1, 1,6
 2, 1,6
 3, 1,1
 3, 5,6
 4, 1,1
 4, 5,6
*RESTART,TIMEMARKS=NO,NUM=2,WRITE
*AMPLITUDE, name=RAMP
 0.0, 0.0, 2.0, 1.0
**
**
*ELSET,ELSET=QA_TEST_ALLELEMS
SHELL,
**
*NSET, NSET=QA_TEST_ALLNODES
ALL, SIDE
**
*STEP
*DYNAMIC,EXPLICIT
 , 2.
*BOUNDARY, type=VELOCITY, amp=RAMP
 3, 4,4, .5
 4, 4,4, .5
***OUTPUT,HISTORY,TIME INTERVAL=0.0
***NODE OUTPUT,NSET=SIDE
**U,V,A
***ELEMENT OUTPUT,ELSET=SHELL
**S,
***ENERGY OUTPUT
**ALLKE,ALLSE,ALLWK,ALLIE,ETOTAL
*FILE OUTPUT,TIMEMARKS=YES, NUM=1
*EL FILE
 S,LE
 STH,
 PEEQ,PE
*NODE FILE
 U,
 COORD,
*OUTPUT, FIELD, TIMEMARKS=YES, NUMBER INTERVAL=1
*ELEMENT OUTPUT, ELSET=QA_TEST_ALLELEMS
 S,LE
 STH,
 PEEQ,PE
*NODE OUTPUT, NSET=QA_TEST_ALLNODES
 U,
 COORD,
*OUTPUT,FIELD,VARIABLE=PRESELECT
*OUTPUT,HISTORY,VARIABLE=PRESELECT,TIMEINT=2
*END STEP