e6.13.txt

185个ANSYS工程结构数值分析非常实用的命令流

!EX6.13 变壁厚柱结构建模
finish
/clear
/prep7
a=6
b=8
h=15
t1=0.8
t2=0.3
et,1,shell93
k,1,b/2-t1/2
k,2,b/2-t1/2,a/2-t1/2
k,3,0,a/2-t1/2
k,4,b/2-t2/2,,h
k,5,b/2-t2/2,a/2-t2/2,h
k,6,0,a/2-t2/2,h
a,1,2,5,4
a,2,3,6,5
esize,0.5
mshkey,1
amesh,all
*get,nodemax,node,,count
*dim,thick,,nodemax
*do,i,1,nodemax
thick(i)=t1-(t1-t2)/h*nz(i)
*enddo
rthick,thick(1)
/eshape,1
/view,1,1,1,1
/ang,1,-120,zs,1
/ang,1,180,ys,1
/ang,1,60,xs,1
eplot