1
操作演示
window。DATA。videoArr。push（{“title”：“3。9 壓阻現象耦合分析”，“vid”：“f3323o3d9qt”，“img”：“http：//inews。gtimg。com/newsapp_ls/0/14544248455_960495/0”，“desc”：“”}）
2
APDL程式碼
！定義標題
/title， Four-terminal piezoresistive element， uMKSV system of units
！定義引數
W=57
L=1。5*W
b=23
a=2*b
S=2*L
c11= 16。57e4
c12= 6。39e4
c44= 7。96e4
rho= 7。8e-8
p11=6。5e-5
p12=-1。1e-5
p44=138。1e-5
p=10
Vs=5
/nopr
！預處理
/prep7
！定義元素屬性
et，1，PLANE223，101
et，2，PLANE183
local，11
local，12，，，，，45
tb，ANEL，1，，，0
tbda，1，c11，c12，c12
tbda，7，c11，c12
tbda，12，c11
tbda，16，c44
mp，RSVX，1，rho
tb，PZRS，1
tbdata，1，p11，p12，p12
tbdata，7，p12，p11，p12
tbdata，13，p12，p12，p11
tbdata，22，p44
！建立模型
csys，12
k，1，b/2，W/2+a
k，2，b/2，W/2
k，3，L/2，W/2
k，4，L/2，-W/2
k，5，b/2，-W/2
k，6，b/2，-W/2-a
k，7，-b/2，-W/2-a
k，8，-b/2，-W/2
k，9，-L/2，-W/2
k，10，-L/2，W/2
k，11，-b/2，W/2
k，12，-b/2，W/2+a
a，1，2，3，4，5，6，7，8，9，10，11，12
csys，11
rect，-S/2，S/2，-S/2，S/2
！劃分網格
aovlap，all
esys，12
type，1
esize，b/4
mshape，1，2-D
amesh，1
type，2
esize，b/2
amesh，3
csys，12
nsel，s，loc，x，-L/2
nsel，r，loc，y，-W/2，W/2
cp，1，volt，all
*get，nl，node，0，num，min
d，nl，volt，Vs
nsel，s，loc，x，L/2
nsel，r，loc，y，-W/2，W/2
d，all，volt，0
nsel，s，loc，y，W/2+a
nsel，r，loc，x，-b/2，b/2
cp，2，volt，all
*get，nt，node，0，num，min
nsel，s，loc，y，-W/2-a
nsel，r，loc，x，-b/2，b/2
cp，3，volt，all
*get，nb，node，0，num，min
nsel，all
csys，11
nsel，s，loc，x，-S/2
d，all，ux，0
nsel，r，loc，y，-S/2
d，all，uy，0
nsel，s，loc，x，S/2
sf，all，pres，p
nsel，all
/pbc，u，，1
/pbc，volt，，1
/pbc，cp，，1
/pnum，type，1
/number，1
eplot
fini
！求解
/solu
antype，static
cnvtol，amps，1，1。e-3
solve
fini
案例來源：ANSYS 15。0多物理耦合場有限元分析從入門到精通