*HEADING
 B22 with BEAM ADDED INERTIA
 frequency analysis followed by transient dynamic
*preprint,model=yes,history=yes,echo=yes
*NODE,NSET=NALL
*NSET,NSET=TIP
*NGEN,NSET=NALL
*ELEMENT,TYPE=B22,ELSET=BS
*ELEMENT,TYPE=B22,ELSET=BGS
*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
*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
*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