/clear
/file,1
/prep7
et,1,97,1
et,2,97
wpoff,0,0,-0.05
CYL4,0.0005, ,0.001, , , ,0.1
wpoff,0,0,0.046
CYL4, , ,0.002, ,0.005, ,0.008
wpoff,,,-0.001
CYL4, , ,0.005, ,0.01, ,0.01
wpoff,,,0.005
sph4,,,0.1
VOVLAP,all
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,MURX,1,,1000
MPDATA,EX,1,,210e9
MPDATA,PRXY,1,,0.3
MPDATA,DENS,1,,7850
!mpdata,damp,1,,0.004
!mpdata,alpd,1,,0.1
mpdata,betd,1,,0.001
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,RSVX,1,,1e-7
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,MURX,2,,1
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,MURX,3,,1.0
MPDATA,MGXX,3,,
MPDATA,MGYY,3,,
MPDATA,MGZZ,3,,9e5
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,MURX,4,,1
MPTEMP,,,,,,,,
MPTEMP,1,0
CSWPLA,11,1,
VSEL, , , , 1
VATT, 1, , 1, 0
VSEL, , , , 2
VATT, 2, , 2, 11
VSEL, , , , 5
VATT, 3, , 2, 11
VSEL, , , , 6
VATT, 4, , 2, 0
alls
smrt,1
vsweep,1
smrt,3
vsweep,all
MSHKEY,0
MSHAPE,1,3d
alls
VMESH,all
esel,s,mat,,2
BFE,all,JS,,,-2/24e-6,, ,
ALLSEL,ALL
NSEL,S,EXT
D,all,all
ALLSEL,ALL
FINISH
/SOL
ANTYPE,3
HROPT,FULL
HROUT,OFF
EQSLV, ,1e-008,
HARFRQ,10000,0,
NSUBST, ,
KBC,0
SOLVE
ESEL,S,MAT,,1
FINISH
/POST1
SET,,, ,,, ,1
PLVECT,JT, , , ,VECT,ELEM,ON,0
PLVECT,B, , , ,VECT,ELEM,ON,0
FINISH
save
/file,2
/PREP7
et,1,45
ET,2,FLUID30
ET,3,130
R,1,0.3,
R,2,0.1,0,0,0,
ET,4,FLUID30,,1,0
MP,DENS,2,1.21
MP,SONC,2,344
MP,DENS,3,1.21
MP,SONC,3,344
MP,DENS,4,1.21
MP,SONC,4,344
esel,s,type,,1
nsle,s
esln,s,0
nsle,s
esel,inve
nsle,s
emodif,all,type,4
alls
NSel,S,ext
type,3
real,2
mat,2
esurf
alls
vsel,s,,,1
aslv,s
NSLA,S,1
esel,s,type,,2
sf,all,fsi,1
alls
DA,1,UX, ,
DA,1,UY, ,
DA,1,UZ, ,
FINISH
/SOL
ANTYPE,3
LDREAD,FORC,,, ,0,'1','rst',' '
HARFRQ,10000,,
KBC,0
SOLVE
FINISH
/POST1
SET,FIRST
esel,s,type,,1
PLVECT,U, , , ,VECT,ELEM,ON,0
PLNSOL, PRES,, 0,1.0