*HEADING
 : FREQUENCY & LINEAR DYNAMICS FOR COMP. SHELLS W/ TRANSV SHEAR  [S8R]
 GAUSS INTEGRATION WITH 6 SECTION POINTS
*RESTART,WRITE
*NODE
 1,  0., 0.
 3,  0., 1.
21, 10., 0.
23, 10., 1.
*NGEN,NSET=NALL
 1,3
 21,23
 1,21,10
 3,23,10
*NSET,NSET=SIDE1
 1,11,21
*NSET,NSET=SIDE2
 21,22,23
*NSET,NSET=SIDE3
 3,13,23
*NSET,NSET=SIDE4
 1,2,3
*ELEMENT,TYPE=S8R,ELSET=EL
 1, 1,21,23,3, 11,22,13,2
*SHELL SECTION,COMPOSITE,ELSET=EL, SECTION=GAUSS
 .5, 6, LAMINA, ZERO
 .5, 6, LAMINA, PL90
 .5, 6, LAMINA, ZERO
*MATERIAL,NAME=LAMINA
*ELASTIC,TYPE=LAMINA
 25.E6, 1.E6, .25, 0.5E6, 0.5E6, 0.2E6
*DENSITY
 1.E-4, 
*ORIENTATION,NAME=ZERO
 1,0,0, 0,1,0
 3, 0.
*ORIENTATION,NAME=PL90
 1,0,0, 0,1,0
 3, 90.
*SPECTRUM,NAME=SPEC,TYPE=ACCELERATION
 0., 0., 0.
 1.E5, 1000., 0.
 1.E5, 10000., 0.
********************************************************************************
*STEP,PERT
** STATIC ANALYSIS: TRANSVERSE SHEAR MODE
*STATIC
*BOUNDARY
 SIDE4,1,6
 SIDE1,1,2
 SIDE1,4,6
 SIDE3,1,2
 SIDE3,4,6
 SIDE2,1,2
 SIDE2,4,6
 SIDE2,3,3,1.
*EL PRINT
 S, 
 TSHR, 
 E, 
*EL PRINT
 SF, 
 SSAVG,
 SE, 
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,TSHR,E
SF,SE,SSAVG
*NODE OUTPUT
U, 
*END STEP
********************************************************************************
*STEP,PERT
** STATIC ANALYSIS: UNIAXIAL MODE
*STATIC
*BOUNDARY
 SIDE4,1,6
 SIDE1,2,6
 SIDE3,2,6
 SIDE2,2,6
 SIDE2,1,1,1.
*END STEP
********************************************************************************
*STEP,PERT
** FREQUENCY ANALYSIS: TRANSVERSE SHEAR, UNIAXIAL AND TWISTING MODES
*FREQUENCY, eigensolver=lanczos
 4, , 
*BOUNDARY
 SIDE4,1,6
 SIDE1,2
 SIDE1,4,6
 SIDE3,2
 SIDE3,4,6
 SIDE2,2
 SIDE2,4,6
*EL PRINT
 S, 
 TSHR, 
 E, 
*EL PRINT
 SF, 
 SSAVG,
 SE, 
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,TSHR,E
SF,SE,SSAVG
*NODE OUTPUT
U, 
*END STEP
********************************************************************************
*STEP
** TRANSVERSE SHEAR MODE
*STEADY STATE DYNAMICS
1., 
100., 
10000., 
*CLOAD
 21,3, 3333.33
 22,3,13333.33
 23,3, 3333.33
*EL PRINT
 S, 
 TSHR, 
 E, 
*EL PRINT
 SF, 
 SSAVG,
 SE, 
*NODE PRINT
 U, 
*MODAL PRINT
 GU,GV,GA
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,TSHR,E
SF,SE,SSAVG
*NODE OUTPUT
U, 
*END STEP
********************************************************************************
*STEP
** TRANSVERSE SHEAR MODE
*STEADY STATE DYNAMICS,SUBSPACE PROJECTION
1., 
100., 
10000., 
*CLOAD
 21,3, 3333.33
 22,3,13333.33
 23,3, 3333.33
*EL PRINT
 S, 
 TSHR, 
 E, 
*EL PRINT
 SF, 
 SSAVG,
 SE, 
*NODE PRINT
 U, 
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,TSHR,E
SF,SE,SSAVG
*NODE OUTPUT
U, 
*END STEP
********************************************************************************
*STEP
** TRANSVERSE SHEAR MODE
*STEADY STATE DYNAMICS,DIRECT
1., 
100., 
10000., 
*BOUNDARY
 SIDE4,1,6
 SIDE1,1,2
 SIDE1,4,6
 SIDE3,1,2
 SIDE3,4,6
 SIDE2,1,2
 SIDE2,4,6
*CLOAD
 21,3, 3333.33
 22,3,13333.33
 23,3, 3333.33
*EL PRINT
 S, 
 TSHR, 
 E, 
*EL PRINT
 SF, 
 SSAVG,
 SE, 
*NODE PRINT
 U, 
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,TSHR,E
SF,SE,SSAVG
*NODE OUTPUT
U, 
*END STEP
********************************************************************************
*STEP
** TIME HISTORY ANALYSIS: TRANSVERSE SHEAR MODE
*MODAL DYNAMIC
.1,.3
*CLOAD
 SIDE2,3,10000.
*EL PRINT
 S, 
 TSHR, 
 E, 
*EL PRINT
 SF, 
 SSAVG,
 SE, 
*NODE PRINT
 U, 
*MODAL PRINT
 GU,GV,GA
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,TSHR,E
SF,SE,SSAVG
*NODE OUTPUT
U, 
*END STEP
********************************************************************************
*STEP
** RESPONSE SPECTRUM ANALYSIS
*RESPONSE SPECTRUM,SUM=ABS,COMP=ALG
 SPEC,0.,0.,1.,386.4
*EL PRINT
 S, 
 TSHR, 
 E, 
*EL PRINT
 SF, 
 SSAVG,
 SE, 
*NODE PRINT
 U, 
*MODAL PRINT
 GU,GV,GA
*OUTPUT,FIELD
*ELEMENT OUTPUT
S,TSHR,E
SF,SE,SSAVG
*NODE OUTPUT
U, 
*END STEP