FINI
/CLE
/FILENAME,EX5-1,1
/TITLE,The Modal Analysis of the Moto_frame
/AUX15  
IGESIN,EX5-1,IGES
VPLOT   
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST
/PREP7
ET,1,SHELL63
MP,EX,1,2.1E+5
MP,PRXY,1,0.3
MP,DENS,1,7.8E-9
R,1,3
ADELE,162
ADELE,222
ADELE,88
AL,607,1039,737,778
AL,778,779,657,403
AL,781,785,1031,1064
!
ESIZE,5
MSHKEY,0
MSHAPE,0,2D 
AMESH,ALL
SAVE
SAVE,EX5-2,db
/SOLU
ANTYPE,2
MODOPT,LANB,10,0,1000
MXPAND,10,,,1
SAVE
SOLVE
FINISH
/POST1
SET,LIST
SET, , ,1, , , ,7,  
PLDISP,2
/DSCALE,1,5
/REPLOT 
PLESOL,S,EQV
/REPLOT 
FINISH
/EXIT,ALL
