本帖最后由 shenda1304 于 2010-7-21 17:34 编辑
我仿照网友icecreamhan的帖子(http://forum.simwe.com/viewthread.php?tid=855600&;highlight=%C9%F9%D1%B9)中给出的例子做的,但是出现了下面这个错误,
Radius of the FLUID130 Acoustic Absorbing element 61731 should be positive; instead found a radius of 0. Please verify the element Real Constant values.
我设置的FLUID130的半径是正的啊,为什么会出现这种错误?
下面是我的代码,请大虾帮我看看,谢谢!
finish
/clear
/prep7
!PZT-5H材料特性参数
mp,DENS,1,7500
mp,perx,1,1704
mp,pery,1,1704
mp,perz,1,1433
tb,ANEL,1
tbdata,1,1.2720E11,8.0212E10,8.4670E10
tbdata,7,1.2720E11,8.4670E10
tbdata,12,1.1744E11
tbdata,16,2.3496E10
tbdata,19,2.2989E10
tbdata,21,2.2989E10
tb,PIEZ,1
tbdata,3,-6.6228
tbdata,6,-6.6228
tbdata,9,23.2403
tbdata,14,17.0345
tbdata,16,17.0345
!定义Si层材料参数
mp,dens,2,2330
MP,EX,2,120e9
MP,nuxy,2,0.42
!材料3为空气介质
MP,DENS,3,1.21
MP,SONC,3,344
!单元类型
et,1,solid5,3
et,2,solid45
ET,3,FLUID30
ET,4,FLUID130
r,4,0.002,0,0 !这里是正数的啊
ET,5,FLUID30,,1,0
!设置尺寸参数
*set,pzt_x_y,2e-3
*set,pzt_z,30e-6
*set,si_x_y,2e-3
*set,si_z,-10e-6
!!1/4个振膜
!!上半部分
block,0,pzt_x_y/2,0,pzt_x_y/2,0,pzt_z
block,-pzt_x_y/2,0,0,pzt_x_y/2,0,pzt_z
block,0,si_x_y/2,0,si_x_y/2,si_z,0
block,-si_x_y/2,0,0,si_x_y/2,si_z,0
!!下半部分
block,0,pzt_x_y/2,0,-pzt_x_y/2,0,pzt_z
block,-pzt_x_y/2,0,0,-pzt_x_y/2,0,pzt_z
block,0,si_x_y/2,0,-si_x_y/2,si_z,0
block,-si_x_y/2,0,0,-si_x_y/2,si_z,0
numcmp,all
vglue,all
SPHERE,,0.002,0,90
VOVLAP,all
!vglue,all
numcmp,all
alls
!对编号为1_6_7_8的体划分网格PZT
lesize,5,,,10,1
lesize,6,,,10,1
lesize,7,,,10,1
lesize,8,,,10,1
lesize,45,,,10,1
lesize,19,,,10,1
lesize,44,,,10,1
lesize,51,,,10,1
lesize,53,,,10,1
lesize,40,,,10,1
lesize,29,,,10,1
lesize,41,,,10,1
!!
lesize,38,,,10,1
lesize,52,,,10,1
lesize,50,,,10,1
lesize,43,,,10,1
lesize,1,,,10,1
lesize,13,,,10,1
lesize,42,,,10,1
lesize,2,,,10,1
lesize,3,,,10,1
lesize,4,,,10,1
lesize,28,,,10,1
lesize,39,,,10,1
!!
lesize,11,,,2,1
lesize,12,,,2,1
lesize,22,,,2,1
lesize,31,,,2,1
lesize,30,,,2,1
lesize,32,,,2,1
lesize,20,,,2,1
lesize,9,,,2,1
VSEL,s,,,1
VSEL,a,,,6
VSEL,a,,,7
VSEL,a,,,8
vatt,1,,1
mshkey,1
VMESH,all
alls
!对编号为2_3_4_9的体划分网格si
lesize,49,,,10,1
lesize,27,,,10,1
lesize,23,,,10,1
lesize,48,,,10,1
lesize,24,,,10,1
lesize,25,,,10,1
lesize,26,,,10,1
lesize,55,,,10,1
lesize,53,,,10,1
lesize,54,,,10,1
lesize,60,,,10,1
lesize,58,,,10,1
!!
lesize,36,,,1,1
lesize,34,,,1,1
lesize,46,,,1,1
lesize,47,,,1,1
lesize,59,,,1,1
lesize,56,,,1,1
lesize,57,,,1,1
lesize,35,,,1,1
VSEL,s,,,2
VSEL,a,,,3
VSEL,a,,,4
VSEL,a,,,9
vatt,2,,2
mshkey,1
VMESH,all
alls
!对编号为5的体划分网格(!!!!!此步骤划分网格需要手动进行!!!!)
VSEL,s,,,5
VATT,3,,3 ! FLUID30和空气 指定的材料属性为空气介质!!!(与结构耦合)!!!
SMRT,1
VMESH,5
alls
!修改不与平板(结构)接触单元的材料类型类型为空气介质!!!(不与结构耦合)!!!
esel,s,type,,1
esel,a,type,,2
nsle,s !p404
esln,s,0
nsle,s
esel,inve !p402
nsle,s
emodif,all,type,5 !p214
alls
!在!!边界!!生成吸收单元。(使用单元fluid130)
Asel,s,,,7
NSLA,S,1
type,4 !FLUID130
real,4
mat,3 !空气
esurf !p208
alls
!建立流-固接触面
asel,s,,,2
asel,a,,,4
asel,a,,,6
asel,a,,,11
asel,a,,,15
asel,a,,,16
nsla,s,1
esel,s,type,,3 !选择附属于这些节点上的流体单元。
sf,all,fsi,1 !p275 !指定所选择的节点作为流体-结构接触面上的节点。
alls !注意—在对分析进行求解前确保重选所有的节点。
!施加约束
asel,s,,,4
asel,a,,,15
asel,a,,,24
asel,a,,,27
asel,a,,,6
asel,a,,,16
asel,a,,,20
asel,a,,,36
asel,a,,,14
asel,a,,,34
asel,a,,,30
asel,a,,,39
asel,a,,,29
asel,a,,,37
asel,a,,,9
asel,a,,,25
nsla,s,1
d,all,ux,0
d,all,uy,0
d,all,uz,0
alls
!施加法向对称约束!!!!!!!没有信心?????????
asel,s,,,12
nsla,s,1
dsym,symm,y,
alls
asel,s,,,13
nsla,s,1
dsym,symm,x,
alls
/solu
antype,harmic
hropt,full
!施加电压
asel,s,,,2
asel,a,,,22
asel,a,,,18
asel,a,,,32
nsla,s,1
!!为什么不能耦合节点电压?????????
!cp,1,volt,all
!*get,n_top,node,0,num,min
d,all,volt,10
alls
asel,s,,,1
asel,a,,,17
asel,a,,,21
asel,a,,,31
nsla,s,1
!cp,1,volt,all
!*get,n_bot,node,0,num,min
d,all,volt,0
alls
!d,n_bot,volt,0
!d,n_top,volt,10
!alls
!alls
nsubst,5
kbc,1
HARF,10000,100000
SOLVE
!对与结构耦合的空气单元和未与结构耦合的空气单元进行后处理,得到声压分布
/post1
SET,FIRST
esel,s,type,,3
esel,a,type,,5
PLESOL,NMISC,4,0,1.0 !p321 |