fini
/cle
/batch,list
/PREP7
!*
et,1,185
keyopt,1,2,2
mp,ex,1,2.07e11
mp,nuxy,1,0.28
mp,dens,1,7860
!* Parameters
thick1 = 0.03810
thick  = thick1
hthick = thick/2.0
radius = 0.09525
inradius = radius - hthick
outradius = radius + hthick
length = 0.254
!*
cylind,inradius,outradius,0,length,0,90
cylind,inradius,outradius,0,length,90,180
cylind,inradius,outradius,0,length,180,270
cylind,inradius,outradius,0,length,270,360
nummrg,kp
esize,thick
vmesh,all
nsel,all
finish
!*
/SOLU
antype,modal
modopt,qrdamp,20
omega,0,0,314.16,1

! Apply Coriolis effect and use default
!   rotating reference frame
coriolis,on
!


!/solu
!antype,modal
!modopt,lanb,15
!mxpand,15
solve
!finish

/post1
set,list
!set,1,1
!pldi,1