压电陶瓷ANSYS
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
根据压电矩阵。
（1）对压电陶瓷加z向电压，产生膨胀、收缩
/PREP7
/GRAPHICS,FULL
!############################## parameter #######################
*AFUN,DEG
VOL=0
VOH=20
!########################### Material property #################
!****************** 3---PZT **************************
et,3,solid5 ! UX,UY,UZ,TEMP,VOLT,MAG
!mp,nuxy,3,0.27
mp,dens,3,7.64e3 ! kg/m3
mp,perx,3,8.93e-9 ! F/m
mp,pery,3,8.93e-9 ! F/m
mp,perz,3,6.92e-9 ! F/m
mp,kxx,3,1
mp,murx,3,1
tb,anel,3 ! Anisotropic elastic matrix 72A??? 99.3.4
tbdata,1,11.565e10,6.489e10,6.229e10,0,0,0
tbdata,7,11.565e10,6.229e10,0,0,0
tbdata,12,9.298e10,0,0,0
tbdata,16,1.786e10,0,0
tbdata,19,1.786e10,0
tbdata,21,1.786e10
tb,piez,3 ! Piezoelectric matrix 72A??? 99.3.4
tbdata,1,0,0,-12.3082
tbdata,4,0,0,-12.3082
tbdata,7,0,0,20.7574
tbdata,10,0,0,0
tbdata,13,0,17.0357,0
tbdata,16,17.0357,0,0
!------------------------ model---------------------------
NUMSTR,KP,1
NUMSTR,LINE,1
NUMSTR,AREA,1
block,0,10,0,5,0,1
type,3
mat,3
esize,0.5
vmesh,all
!------------boundary condition-----------------------
nsel,s,loc,x,0
d,all,ux
d,all,uy
d,all,uz
! -------------COUPLE THE TWO FACE OF ELECTRODE -------------
nsel,s,loc,z,1
cp,11,volt,all
*get,ntop,node,,num,min
nsel,s,loc,z,0
cp,21,volt,all
*get,nbot,node,,num,min
ALLS
finish
/eof
!-------------------------------------------
/solu
antype,static
ALLS
d,nTOP,volt,voh
d,nBOT,volt,vol
ESEL,S,TYPE,,3
NSLE
D,ALL,TEMP
!D,ALL,MAG
ALLS
nsel,all
esel,all
save
solve
fini
/eof
（2）对压电陶瓷加x向电压，产生摆动
/PREP7
/GRAPHICS,FULL
!############################## parameter #######################
*AFUN,DEG
VOL=0
VOH=20
!########################### Material property #################
!****************** 3---PZT **************************
et,3,solid5 ! UX,UY,UZ,TEMP,VOLT,MAG
!mp,nuxy,3,0.27
mp,dens,3,7.64e3 ! kg/m3
mp,perx,3,8.93e-9 ! F/m
mp,pery,3,8.93e-9 ! F/m
mp,perz,3,6.92e-9 ! F/m
mp,kxx,3,1
mp,murx,3,1
tb,anel,3 ! Anisotropic elastic matrix 72A??? 99.3.4
tbdata,1,11.565e10,6.489e10,6.229e10,0,0,0
tbdata,7,11.565e10,6.229e10,0,0,0
tbdata,12,9.298e10,0,0,0
tbdata,16,1.786e10,0,0
tbdata,19,1.786e10,0
tbdata,21,1.786e10
tb,piez,3 ! Piezoelectric matrix 72A??? 99.3.4
tbdata,1,0,0,-12.3082
tbdata,4,0,0,-12.3082
tbdata,7,0,0,20.7574
tbdata,10,0,0,0
tbdata,13,0,17.0357,0
tbdata,16,17.0357,0,0
!------------------------ model---------------------------
NUMSTR,KP,1
NUMSTR,LINE,1
NUMSTR,AREA,1
block,0,10,0,5,0,1
type,3
mat,3
esize,0.5
vmesh,all
!------------boundary condition-----------------------
nsel,s,loc,x,0
d,all
,ux
d,all,uy
d,all,uz
! -------------COUPLE THE TWO FACE OF ELECTRODE -------------
nsel,s,loc,x,10
cp,11,volt,all
*get,front,node,,num,min
nsel,s,loc,x,0
cp,21,volt,all
*get,back,node,,num,min
ALLS
finish
!-------------------------------------------
/solu
antype,static
ALLS
d,front,volt,voh
d,back,volt,vol
ESEL,S,TYPE,,3
NSLE
D,ALL,TEMP
D,ALL,MAG
ALLS
save
solve
fini
/eof
（3）对压电陶瓷加x向位移（压力），产生电压，电压会让结构z变形
/PREP7
/GRAPHICS,FULL
!############################## parameter #######################
*AFUN,DEG
VOL=0
VOH=20
!########################### Material property #################
!****************** 3---PZT **************************
et,3,solid5 ! UX,UY,UZ,TEMP,VOLT,MAG
!mp,nuxy,3,0.27
mp,dens,3,7.64e3 ! kg/m3
mp,perx,3,8.93e-9 ! F/m
mp,pery,3,8.93e-9 ! F/m
mp,perz,3,6.92e-9 ! F/m
mp,kxx,3,1
mp,murx,3,1
tb,anel,3 ! Anisotropic elastic matrix 72A??? 99.3.4
tbdata,1,11.565e10,6.489e10,6.229e10,0,0,0
tbdata,7,11.565e10,6.229e10,0,0,0
tbdata,12,9.298e10,0,0,0
tbdata,16,1.786e10,0,0
tbdata,19,1.786e10,0
tbdata,21,1.786e10
tb,piez,3 ! Piezoelectric matrix 72A??? 99.3.4
tbdata,1,0,0,-12.3082
tbdata,4,0,0,-12.3082
tbdata,7,0,0,20.7574
tbdata,10,0,0,0
tbdata,13,0,17.0357,0
tbdata,16,17.0357,0,0
!------------------------ model---------------------------
NUMSTR,KP,1
NUMSTR,LINE,1
NUMSTR,AREA,1
block,0,10,0,5,0,1
type,3
mat,3
esize,0.5
vmesh,all
!------------boundary condition-----------------------
nsel,s,loc,x,0
d,all,ux
d,all,uy
d,all,uz
nsel,s,loc,x,10
d,all,ux
d,all,uy
d,all,uz,-0.01
!-------------------------------------------
/solu
antype,static
ALLS
ESEL,S,TYPE,,3
NSLE
D,ALL,TEMP
D,ALL,MAG
ALLS
save
solve
fini
/eof