请教欧阳大师,我做了一个模拟重力坝的流固耦合例子,算出的基频怎么跟没有水一样呢!?我弄不明白,请大师指点。命令流如下:
/prep7
et,1,plane42
et,2,solid65
et,3,fluid30
mp,ex,1,3.0e10
mp,nuxy,1,0.167
mp,dense,1,2400
mp,dense,2,1000
mp,sonc,2,1517
mp,mu,2,0
rectng,0,80,0,120
rectng,-240,0,0,110
lsel,s,,,1,3,2
lesize,all,,,8
lsel,s,,,2,4,2
lesize,all,,,12
amesh,1
lsel,s,,,5,7,2
lesize,all,,,24
lsel,s,,,6,8,2
lesize,all,,,11
amesh,2
extopt,esize,5,0,
extopt,aclear,1
type,2,
mat,1
vext,1,,,,,50
eplot
extopt,esize,5,0,
extopt,aclear,1
type,3,
mat,2
vext,2,,,,,50
eplot
vglue,all
nummrg,all
numcmp,all
allsel
/solu
antype,modal
modopt,unsym,10
eqslv,front
mxpand,10,,,yes,
outp,all
outres,all,all
/output,zhijieouhe1,txt
nsel,s,loc,z,0
nsel,a,loc,z,50
d,all,uz
nsel,s,loc,y,0
nsel,r,loc,x,0,80
d,all,all
nsel,s,loc,y,0
nsel,r,loc,x,-240,0
d,all,uy
nsel,s,loc,x,0
nsel,r,loc,y,0,110
nplot
sf,all,fsi
allsel
eplot
da,11,pres,0
sfgrad,pres,,y,,-9810
da,12,pres,9810*120
!nsel,s,loc,x,-240
!d,all,all
allsel
eplot
solv
fini
/post1
set,next
plnsol,u,sum,2,1
先谢过欧阳大师。 |