ANSYS单轴拉伸应力状态下电磁场分析apdl命令流.pdfVIP

ANSYS单轴拉伸应力状态下电磁场分析apdl命令流

/cleaar

/filename,struc

/prep7!步入前处理器

l=155e-3

b=35e-3

l1=20e-3

b1=20e-3

r1=5e-3

l2=20e-3

b2=22e-3

r2=5e-3

l3=20e-3

b3=25e-3

r3=38e-3

h1=sqrt(2*(b/2-b3/2)*r3-(b/2-b3/2)**2)

h2=sqrt(2*(b3/2-b2/2)*r2-(b3/2-b2/2)**2)

h3=sqrt(2*(b2/2-b1/2)*r1-(b2/2-b1/2)**2)

h4=sqrt(2*(b/2-b1/2)*r3-(b/2-b1/2)**2)

hh=(l-h1-h2-h3-h4-l1-l2-l3)/2

k,2,b/2

k,3,b/2,hh

k,4,b3/2,hh+h1

k,5,b3/2,hh+h1+l3

k,6,b2/2,hh+h1+l3+h2

k,7,b2/2,hh+h1+l3+h2+l2

k,8,b1/2,hh+h1+l3+h2+l2+h3

k,9,b1/2,hh+h1+l3+h2+l2+h3+l1

k,10,b/2,l-hh

k,11,b/2,l

k,12,,l

k,21,b3/2+r3,hh+h1

k,22,b2/2+r2,hh+h1+l3+h2

k,23,b1/2+r1,hh+h1+l3+h2+l2+h3

k,24,b1/2+r3,hh+h1+l3+h2+l2+h3+l1

l,10,11

l,11,12

larc,3,4,21,r3

larc,5,6,22,r2

larc,7,8,23,r1

larc,9,10,24,r3

mptemp,1,0

!tbde,miso,1

mpdata,ex,1,,206e9

mpdata,prxy,1,,0.3

tb,plas,1,1,3,miso

tbtemp,0

tbpt,,0,335e6

tbpt,,44e-3,580e6

tbpt,,100e-3,580e6

et,1,183,,,1!八节点单元

amesh,all

nsel,s,loc,y,0

d,all,all,0

/solu!进入求解器

antype,0!定义为稳态分析

nlgeom,1

autots,1

nsub=20

*do,i,1,nsub

ll=i/nsub*l1

nsel,s,loc,y,l

d,all,uy,ll

time,ll

/rep,fast

/rgb,index,100,100,100,0

/rgb,index,80,80,80,13

/rgb,index,60,60,60,14

/rgb,index,0,0,0,15

/plopts,info,1

/plopts,leg1,1

/plopts,leg2,0

/plopts,leg3,1

/plopts,frame,1

/plopts,title,1

/plopts,minm,1

/plopts,file,0

/plopts,logo,1

/plopts,wins,1

/plopts,wp,0

/plopts,date,0

/triad,orig

/replot

plns,s,eqv

antime,50,0.2,,1,2,0,0.2e-01

/show,jpeg

*do,i,1,nsub

plnsol,s,eqv,0,1.0

/show,close