該命令流為計算單轉子-支承系統在加速運行過程中，受質量不平衡激勵下的瞬態動力學響應。可以準確計算出在共振轉速下的峰值及彎曲應變能情況。給出了詳細的表加載轉速和不平衡力的方法，可供參考。

/prep7
! ** parameters
length = 0.4
ro_shaft = 0.01
ro_disk = 0.15
md = 16.47
id = 9.427e-2
ip = 0.1861
kxx = 2.0e+5
kyy = 5.0e+5
beta = 2.e-4
! ** material = steel
mp,ex,1,2.0e+11
mp,nuxy,1,.3
mp,dens,1,7800
! ** elements types
et,1,188
sect,1,beam,csolid
secdata,ro_shaft,20
et,2,21
r,2,md,md,md,id,id,ip
et,3,14,,1
r,3,kxx,beta*kxx
et,4,14,,2
r,4,kyy,beta*kyy
! ** shaft
type,1
secn,1
mat,1
k,1
k,2,,,length
l,1,2
lesize,1,,,9
lmesh,all
! ** disk
type,2
real,2
e,5
! ** bearing
n,21,-0.05,,2*length/3
type,3
real,3
e,8,21
type,4
real,4
e,8,21
! ** constraints
dk,1,ux,,,,uy
dk,2,ux,,,,uy
d,all,uz
d,all,rotz
d,21,all
finish