Beam Harmonic MSUP

FINISH
/CLEAR,NOSTART
/PREP7  

ET,1,BEAM188
SECTYPE,1,BEAM,CHAN,,0   
SECOFFSET,USER,-0.02,0.05
SECDATA,0.1,0.1,0.1,0.02,0.02,0.02,0,0,0,0,0,0  

K,1,0,0,,   
K,2,5,0,,   
LSTR,1,2,10  

MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,200E9  
MPDATA,PRXY,1,,0.3  
MPDATA,DENS,1,,7800 

LMESH,ALL

D,1,ALL,0

!-------------------------- Modal --------------------------------

/SOLU
ANTYPE,MODAL
MODOPT,LANB,30
MXPAND,,,,YES
RESVEC,ON
MODCONT,ON
THEXPAND,OFF

F,2,FY,1
SOLVE

FDELE,2,FY
F,6,FY,1
SOLVE

FDELE,6,FY
F,8,FY,1
SOLVE

FDELE,8,FY

FINISH

!-------------------------- Harmonic --------------------------------

/SOLU
ANTYPE,3
HROPT,MSUP
RESVEC,ON

LVSCALE,1
F,2,FY,1
SOLVE