*HEADING
EC38SHDA: CORIOLIS LOAD  [C3D8H]
*PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE,NSET=ALL
 1,0.,0.,0.
 2,7.,0.,0.
5,0.,7.,0.
 6,7.,7.,0.
 4,0.,0.,-7.
 3,7.,0.,-7.
8,0.,7.,-7.
 7,7.,7.,-7.
*ELEMENT,TYPE=C3D8H, ELSET=EALL
 1, 1,2,3,4,5,6,7,8
*SOLID SECTION,MATERIAL=A1, ELSET=EALL
*MATERIAL,NAME=A1
*ELASTIC
  3.E+6,0.3
*STEP
*STATIC
.0001,.0001
*BOUNDARY
 ALL,1,1,.001
 ALL,2,2,.0005
 ALL,3,3
*DLOAD
 1, CORIO, 5., -1000.,3.5,-3.5, 0.,1.,0.
*EL PRINT
 LOADS,
*NODE PRINT
 RF, 
*END STEP