原创力文档- 1、本文档共7页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
ANSYS压电分析命令流详解
FINISH
/CLEAR,START
/PREP7
!定义压电单元及参数
!单元定义
ET,1,SOLID5
KEYOPT,1,1,3
KEYOPT,1,3,0
KEYOPT,1,5,0
!定义材料
MPTEMP,1,0
MPDE,DENS,1
MPDATA,DENS,1,,7700
MPTEMP,1,0
MPDE,PERX,1
MPDATA,PERX,1,,826
MPDE,PERY,1
MPDATA,PERY,1,,919
MPDE,PERZ,1
MPDATA,PERZ,1,,919
d矩阵,球坐标系下，
r方向为3方向
TBDE,PIEZ,1
TB,PIEZ,1,,,1
TBMODIF,1,1,3.56E-010
TBMODIF,1,2,0
TBMODIF,1,3,
TBMODIF,2,1,-1.48E-010
TBMODIF,2,2,0
TBMODIF,2,3,
TBMODIF,3,1,-1.48E-010
TBMODIF,3,2,0
TBMODIF,3,3,
TBMODIF,4,1,0
TBMODIF,4,2,4.32E-010
TBMODIF,4,3,
TBMODIF,5,1,0
TBMODIF,5,2,
TBMODIF,5,3,0
TBMODIF,6,1,
TBMODIF,6,2,0
TBMODIF,6,3,4.32E-010
d矩阵,球左边系下，
r方向为3方向
e矩阵,球左边系下，
r方向为3方向
TBDE,ANEL,1,,,
TB,ANEL,1,1,21,1
TBTEMP,0
TBDATA,,11.087e-12,7.509e-12,7.509e-12,0,0,0
TBDATA,,12.035e-12,7.5179e-12,0,0,0,12.035e-12
TBDATA,,0,0,0,2.1053e-12,0,0
TBDATA,,2.1053e-12,0,2.2584e-12,,,
e矩阵,球左边系下，
r方向为3方向
!定义压电单元及参数
!建模
!r1内径
!r2外径
r1=7e-3
r2=10e-3
!球
cyl4,,,r1,,r2,90
VROTAT,all,,,,,,3,2,90,,
!球
!定义球坐标系，选择
材料1，并弄将压电矩阵转置到球坐标系下
CSWPLA,11,2,1,1,
TYPE,1
MAT,1
REAL,
ESYS,11
SECNUM,
!定义球坐标系，选择
材料1，并弄将压电矩阵转置到球坐标系下
!设置压电球网格密度
CSYS,2!球坐标系，X轴为r方向
p1=5!=============压电球厚度方向单元数
LSEL,S,LOC,X,1.1*r1,0.9*r2
LESIZE,all,,,p1,,,,,1
LSEL,S,LOC,X,r1
LESIZE,all,,,4*p1,,,,,1!=============压电球周向单元
数4*p1=============
!设置压电球网格密度
VMESH,all!画网格
allsel
!1/8球体位移边界条件
ASEL,S,LOC,X,0
APLOT
NSLA,R,1
D,ALL,,0,,,,UX,,
文档评论（0）