例子:
The model is a simply supported beam spinning at up to 30,000 rd/s.
- /title, Spinning simply supported beam
- !* Parameters
- lx=8 ! length
- dia=0.2 ! diameter
- !*
- /PREP7
- ET,1,16
- R,1, dia, dia/2
- MP,EX,1,2e+11
- MP,DENS,1,7800
- MP,PRXY,1,0.3
- n,1
- n,9,lx
- fill,1,9
- e,1,2
- egen,8,1,-1
- d,1,uy,,, ,,uz ! simply supported left end
- d,9,uy,,, ,,uz ! simply supported right end
- d,all,ux ! supress axial motion
- d,all,rotx ! supress torsion
- finish
- !*
- /SOLU
- antype,modal
- !
- ! Use the QRDAMP eigensolver, request 8 modes,
- ! and specify complex eigensolutions
- modopt,qrdamp,8,,,on
- !
- ! Apply Coriolis effect and specify
- ! stationary reference frame
- coriolis,on,,,on
- !
- omega,0.
- mxpand,8
- solve
- omega,30000.
- mxpand,8
- solve
- finish
- !*
- /POST1
- ! Plot Campbell Diagram
- plcamp,on
- finish
复制代码
|