*HEADING
: CORIOLIS LOAD  [STRI65]
**PREPRINT,ECHO=YES,HISTORY=NO,MODEL=NO
*NODE,NSET=NALL
 1,0.,0.
 3,7.,0.
 7,0.,7.
 9,7.,7.
 5,3.5,3.5
*NGEN,NSET=NALL
 1,3
 1,7,3
 3,9,3
 4,6
 7,9
*NSET,NSET=BOUNDARY,GENERATE
 1,4
 6,9
*ELEMENT,TYPE=STRI65, ELSET=EALL
    1,     1,     3,     9,     2,     6,     5
50001,     1,     9,     7,     5,     8,     4
*SHELL SECTION,MATERIAL=A1, ELSET=EALL
2.,3
*MATERIAL,NAME=A1
*ELASTIC
 3.E6,.3
*STEP
*STATIC
.0001,.0001
*BOUNDARY
 NALL,1,1,.001
 NALL,2,2,.0005
 NALL,3,6
*OUTPUT,HISTORY,FREQUENCY=1
*ENERGY OUTPUT,VARIABLE=PRESELECT
*OUTPUT,FIELD
*NODE OUTPUT
RF,
*DLOAD
 1,CORIO,5.,0.,0.,0.,  0.,0.,1.
 50001,CORIO,5.,0.,0.,0.,  0.,0.,1.
*EL PRINT
 LOADS,
*OUTPUT,FIELD
*ELEMENT OUTPUT
LOADS,
*NODE PRINT,TOTAL=YES
 RF, 
*END STEP