FINISH
/CLEAR,NOSTART
/PREP7
L=100
E=200E9
K,1,0,0,,
K,2,L,0,,
LSTR,1,2,10
ET,1,BEAM188
SECTYPE,1, BEAM, RECT, , 0
SECDATA,1,1,
MP,EX,1,E
MP,PRXY,1,0.3
MP,DENS,1,7800
LMESH,ALL
!------------ MODAL SOLUTION ---------------------
/SOLU
ANTYPE,MODAL
MODOPT,QRDAMP,20
MXPAND,ALL,,,YES
D,1,ALL,0
SOLVE
FINISH
!------------- PSD SOLUTION -------------------
/SOLU
ANTYPE,SPECTR
SPOPT,PSD,,YES
D,1,UY,1
PSDUNIT,1,ACEL
PSDFRQ,1,,100.,500.,1000.,1200.,1500.
PSDVAL,1,1.,5.,8.,7.,4.
PFACT,1,BASE
SOLVE
FINISH
/SOLU
ANTYPE,SPECTR
PSDCOM
SOLVE
FINISH