椭球壳的建立以及节点坐标系的处理

sfwaver

!!!!!!!!!!!椭球壳的建立（改变yx和zx可以建立任意形状的椭球壳）
lx=1!x轴半轴长
yx=0.5!y轴半轴长/x轴半轴长
zx=2!z轴半轴长/x轴半轴长
hh=0.005!壳厚
/prep7
et,1,shell181
mp,ex,1,21.6e10
mp,dens,1,7800
mp,prxy,1,0.28
mp,dmpr,1,0.0005
sectype,1,shell
secdata,hh
!建立模型
k,1,lx,0,0
k,2,0,lx*yx,0
k,3,0,0,lx*zx
local,11,2,0,0,0,0,0,0,yx,zx!生成与椭球模型一致的椭球坐标系(关键)
a,1,2,3!生成1/8椭球壳
csys,0
arsym,z,all,,,,,0
arsym,x,all,,,,,0
arsym,y,all,,,,,0
nummrg,kp
allsel,all
!网格
esize,0.05
aatt,1,,1,,1
amesh,all
!显示或节点坐标
csys,11
nrotat,all!将所有节点的节点坐标x轴转向所在面的法线方向（即每个节点的x轴垂直于壳表面）
/eshape,1.0
/view,1,1,1,1
finish
!求解
/solu

min_830

回复 1 # sfwaver 的帖子

您好！您可以加扣扣：1653042919!试试