*HEADING
 B22 with BEAM ADDED INERTIA
 frequency analysis followed by transient dynamic
*preprint,model=yes,history=yes,echo=yes
*NODE,NSET=NALL
   1,  0.,   0.
  13,  0., 300.
  101, 0.,   0.
  113, 0., 300.
*NSET,NSET=TIP
 13,113
*NGEN,NSET=NALL
1,13,2
101,113,2
*ELEMENT,TYPE=B22,ELSET=BS
 1, 1,3,5
 2, 5,7,9
 3, 9,11,13
*ELEMENT,TYPE=B22,ELSET=BGS
 101, 101,103,105
 102, 105,107,109
 103, 109,111,113
*BEAM GENERAL SECTION,SECTION=RECT,ELSET=BGS,ROTARY INERTIA=EXACT,DENSITY=0.8
 1.,3.
 0.,0.,-1.
 30.E8,
*BEAM ADDED INERTIA,COMPOSITE=0.01
 1., 0.,-2.
*DAMPING,COMPOSITE=0.01 
*BEAM SECTION,SECTION=RECT,MAT=MAT,ELSET=BS,ROTARY INERTIA=EXACT
 1.,3.
 0.,0.,-1.
*BEAM ADDED INERTIA,COMPOSITE=0.01
 1., 0.,-2.
*MATERIAL,NAME=MAT
*ELASTIC
 30.E8, 
*DENSITY
 0.8,
*DAMPING,COMPOSITE=0.01 
*BOUNDARY
 1, 1,2
 1, 6,6
 101, 1,2
 101, 6,6
*ELSET,ELSET=EALL
 BS,BGS
*STEP
 FREQ 1
*FREQUENCY, SIM=NO
 10,
*END STEP
*STEP,inc=200,nlgeom
*DYNAMIC
 .01,1.0
*NODE PRINT,freq=50
 U,
*EL PRINT,freq=50
 SF,
*DLOAD
 EALL,GRAV,1.,1.,0.,0.
*CLOAD
 13,1,1.
 113,1,1.
*OUTPUT,FIELD, FREQUENCY=0
*NODE OUTPUT,NSET=NALL
 U,
*ELEMENT OUTPUT,ELSET=EALL
*OUTPUT,HISTORY, FREQUENCY=1
*NODE OUTPUT,NSET=TIP
 U,
*ELEMENT OUTPUT,ELSET=EALL
 SF,SE
*END STEP