马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
在耦合的电极上加载正弦电压载荷,结果却只有压电片在动,求解答
我的命令流如下:(有的地方不会命令流,用的GUI做的,如括号内所示)
/title, yuanpan
/PREP7
ET,1,SOLID226,1001 !定义压电陶瓷元素类型
ET,2,SOLID185 !定义圆盘元素类型
MP,DENS,1,7700 !定义压电陶瓷材料密度 (压电陶瓷参数是从网上抄的)
TB,DPER,1 !定义压电陶瓷介电常数矩阵
TBDATA,1,729,635,729
TB,ANEL,1 !定义压电陶瓷刚度矩阵 弹性系数c
TBDATA,1,13.9E10,7.43E10,7.78E10
TBDATA,7,11.5E10,7.43E10
TBDATA,12,13.9E10
TBDATA,16,2.56E10
TBDATA,19,2.56E10
TBDATA,21,3.06E10
TB,PIEZ,1 !定义压电陶瓷应力矩阵 压电系数e
TBDATA,2,-5.2
TBDATA,5,15.1
TBDATA,8,-5.2
TBDATA,10,12.7
TBDATA,15,12.7
MP,DENS,2,8200 !定义圆盘材料密度
MP,EX,2,1.17E11 !定义圆盘材料弹性模量
MP,PRXY,2,0.3 !定义圆盘材料泊松比
CYL4,0,0,0.02, , , ,0.0004 !建模
CYL4,0,0,0.002, , , ,0.0004
VSBV, 1, 2
BLOCK,-0.001,0.001,0.007,0.014,0.0004,0.0006, !两个压电片
BLOCK,-0.001,0.001,-0.007,-0.014,0.0004,0.0006,
ALLSEL,ALL
VGLUE,ALL !将压电陶瓷和圆盘进行粘贴
ALLSEL,ALL
!网格划分控制
LSEL,S,LOC,Z,0.0004,0.0006
LESIZE,ALL,1e-3,,,,,,,1 !控制压电陶瓷划分网格
LSEL,INVE
LESIZE,ALL,1e-3,,,,,,,1 !控制圆盘划分网格
ALLSEL,ALL
!分配单元、材料
VSEL,S,LOC,Z,0.0004,0.0006
TYPE,1 !给压电陶瓷定义元素及材料类型
MAT,1
VPLOT
VSWEEP,ALL
VSEL,INVE
TYPE,2 !给圆盘定义元素及材料类型
MAT,2
VPLOT
(这一步是给圆盘自由划分网格,因为发现不能VSWEEP,命令流不知道怎么写)
ALLSEL,ALL
! == Solution
/SOLU
(这一步是选择中心圆孔面,固定,面7、8)
d,all,ux,0,,,,uy,uz
allsel,all
!瞬态分析
antype,trans
trnopt,full
tintp,,0.25,0.5,0.5
outpr,all,all
outres,all,all
kbc,1
(选择压电片底面即面1、13,)
NSLA,R,1
CP,1,VOLT,ALL !定义底部电极
n_ground=ndnext(0) ! get master node on ground electrode
ALLSEL,ALL
ASEL,S,LOC,Z,0.0006
NSLA,R,1
CP,2,VOLT,ALL !定义顶部电极
n_load=ndnext(0) ! get master node on loaded electrode
nsel,all
d,n_ground,volt,0 ! ground
*do,i,1,150,1
t=i/400000
time,t
nsubst,1
v=10*sin(2*3.14159*3013.12*t)
d,n_load,volt,v ! apply v Volt
allsel,all
solve
*enddo
finish
后处理用动画显示时,只有压电片在动,圆盘完全不动。。。求解答,小弟感激不尽。。 |