*HEADING
: SHELL OFFSET FOR LINEAR DYNAMICS [S8R]
*RESTART,WRITE,FREQ=999
*NODE,NSET=ALL
9,0,0,0.1
10,10.,0,0.1
11,10.,1.0,0.1
12,0.,1.0,0.1
13,5.,0,0.1
14,10.,0.5,0.1
15,5.,1.0,0.1
16,0.,0.5,0.1
*NSET,NSET=SHELLT
9,10,11,12,13,14,15,16
*NSET,NSET=LEFT
9,12,16
*NSET,NSET=BOT
9,10,13
*ELEMENT,TYPE=S8R,ELSET=SHELLT
2,9,10,11,12,13,14,15,16
*SHELL GENERAL SECTION,MATERIAL=ELMAT, ELSET=SHELLT,OFFSET=0.5
0.2,3
*MATERIAL,NAME=ELMAT
*ELASTIC
3.E6,0.25
*DENSITY
7.5E-4, 
*NSET,NSET=RIGHT
10,11,14
*BOUNDARY
LEFT,1,6
RIGHT,1,4
RIGHT,6,6
*SPECTRUM,NAME=SPEC,TYPE=ACCELERATION
 0., 0., 0.
 1.E5, 1000., 0.
 1.E5, 10000., 0.
*STEP
*FREQUENCY, eigensolver=lanczos
2, , 
*EL PRINT,ELSET=SHELLT
 1,2,3
 S,
 E,
*NODE PRINT,NSET=SHELLT
 U,
 RF,
*OUTPUT,FIELD
*ELEMENT OUTPUT,ELSET=SHELLT
 1,2,3
 S,
 E,
*NODE OUTPUT,NSET=SHELLT
 U, RF,
*OUTPUT,HISTORY
*ELEMENT OUTPUT,ELSET=SHELLT
 1,2,3
 S,
 E,
*NODE OUTPUT,NSET=SHELLT
 U, RF,
*END STEP
*STEP
*STEADY STATE DYNAMICS,DIRECT
0.01, 
0.1, 
1., 
*CLOAD
RIGHT,5,-100.
*END STEP
*STEP
*MODAL DYNAMIC
.001,.003
*CLOAD
 RIGHT,5,-100.
*END STEP
*STEP
*RESPONSE SPECTRUM,SUM=ABS,COMP=ALG
 SPEC,0.,0.,1.,386.4
*END STEP
*STEP
*FREQUENCY, eigensolver=lanczos
14, , 
*NODE PRINT,F=0
*EL PRINT,F=0
*OUTPUT,FIELD,FREQ=0
*END STEP
*STEP
*STEADY STATE DYNAMICS,SUBSPACE PROJECTION
0.01, 
0.1, 
1., 
*CLOAD
RIGHT,5,-100.
*EL PRINT,F=0
*NODE PRINT,F=0
*EL PRINT,ELSET=SHELLT
 1,2,3
 S,
 E,
*NODE PRINT,NSET=SHELLT
 U,
 RF,
*OUTPUT,FIELD
*ELEMENT OUTPUT,ELSET=SHELLT
 1,2,3
 S,
 E,
*NODE OUTPUT,NSET=SHELLT
 U, RF,
*OUTPUT,HISTORY
*ELEMENT OUTPUT,ELSET=SHELLT
 1,2,3
 S,
 E,
*NODE OUTPUT,NSET=SHELLT
 U, RF,
*END STEP