本帖最后由 lovetoend 于 2012-7-18 23:05 编辑
小弟对一个梁进行划分网格,两分成了18个体,还有一个是另一种材料的体
对编号为2的体想进行密度高一点的网格划分,可始终做不了
求助各位大神,帮忙解答一下,感激不尽
finish
/clear
/prep7
ET,1,SOLID5,3 !定义三维固体耦合场单元
ET,2,SOLID45 !定义三维实体单元
MP,DENS,1,7500 !压电陶瓷密度
MP,PERX,1,762 !X和Y轴向的介电常数
MP,PERZ,1,663 !Z轴向的介电常数
TB,PIEZ,1 !定义压电系数
TBDATA,16,12.7179
TBDATA,14,12.7179
TBDATA,3,-5.2028
TBDATA,6,-5.2028
TBDATA,9,15.0804
TB,ANEL,1 !压电陶瓷的弹性系数
TBDATA,1,1.39E11,7.7837E10,7.4284E10
TBDATA,7,1.39E11,7.4284E10
TBDATA,12,1.541E11
TBDATA,16,3.0581E10
TBDATA,19,2.5641E10
TBDATA,21,2.5641E10
MP,EX,2,3e10
MP,PRXY,2,0.18
MP,DENS,2,2400
MP,EX,3,3e10
MP,PRXY,3,0.18
MP,DENS,3,2500
!!!!!建立模型划分网格!!!!!!!
block,-0.005,0.005,-0.005,0.005,0,-0.0005 !体编号为1
vatt,1,,1
block,-0.01,0.01,-0.01,0.01,0,0.02 !体编号为2
vatt,3,,2
block,-0.01,0.01,-0.01,-0.15,0,0.02 !体编号为3
vatt,2,,2
block, 0.01,0.04,-0.01,-0.15,0,0.02 !体编号为4
vatt,2,,2
block, 0.01,0.04,-0.01, 0.01,0,0.02 !体编号为5
vatt,2,,2
block, 0.01,0.04, 0.01, 0.15,0,0.02 !体编号为6
vatt,2,,2
block, 0.01,-0.01, 0.01, 0.15,0,0.02 !体编号为7
vatt,2,,2
block,-0.01,-0.04, 0.01, 0.15,0,0.02 !体编号为8
vatt,2,,2
block,-0.01,-0.04, 0.01,-0.01,0,0.02 !体编号为9
vatt,2,,2
block,-0.01,-0.04,-0.01,-0.15,0,0.02 !体编号为10
vatt,2,,2
block,-0.01,0.01,-0.01,0.01,0.02,0.1 !体编号为11
vatt,2,,2
block,-0.01,0.01,-0.01,-0.15,0.02,0.1 !体编号为12
vatt,2,,2
block, 0.01,0.04,-0.01,-0.15,0.02,0.1 !体编号为13
vatt,2,,2
block, 0.01,0.04,-0.01, 0.01,0.02,0.1 !体编号为14
vatt,2,,2
block, 0.01,0.04, 0.01, 0.15,0.02,0.1 !体编号为15
vatt,2,,2
block, 0.01,-0.01, 0.01, 0.15,0.02,0.1 !体编号为16
vatt,2,,2
block,-0.01,-0.04, 0.01, 0.15,0.02,0.1 !体编号为17
vatt,2,,2
block,-0.01,-0.04, 0.01,-0.01,0.02,0.1 !体编号为18
vatt,2,,2
block,-0.01,-0.04,-0.01,-0.15,0.02,0.1 !体编号为19
vatt,2,,2
nummrg,all
numcmp,all
ALLSEL,ALL
lsel,s,loc,z,0 !对压电片进行划分网格
lsel,r,mat,,1
lsel,a,loc,z,-0.0005
lesize,all,,,10
ALLSEL,ALL
lsel,s,loc,x,-0.005
lsel,a,loc,x,0.005
lsel,u,loc,z,0
lsel,u,loc,z,-0.0005
lesize,all,,,2
vmesh,1
ALLSEL,ALL !对混凝土加密部分进行划分网格
lsel,s,loc,z,0
lsel,a,loc,z,0.02
lsel,r,mat,,3
lesize,all,,,20
ALLSEL,ALL
lsel,s,loc,x,-0.01
lsel,a,loc,x,0.01
lsel,u,loc,z,0
lsel,u,loc,z,0.02
lsel,r,mat,,3
lesize,all,,,20
vmesh,2
ALLSEL,ALL !对混凝土部分进行划分网格
lsel,s,mat,,2
lesize,all,0.01
vmesh,3,19
--------------------------------------------
划分出的网格乱七八糟,希望有人能指点指点
|