新浪博客

[转载]ANSYS圆、圆环面、圆柱面、圆柱体的网格划分

2016-07-02 16:36阅读:

圆的网格划分
finish $ /clear $ /prep7
et,1,plane82 $ r0=10 ! 定义单元类型和圆半径参数
cyl4,,,r0 $ cyl4,3*r0,,,,r0 ! 创建两个圆面 A 和 B,拟分别进行不同的网格划分
wprota,,90 $ asbw,all ! 将圆面水平切分
wprota,,,90 $ asbw,all ! 将圆面 A 竖向切分
wpoff,,,3*r0 $ asbw,all
! 移动工作平面,将圆面 B 竖向切分
wpcsys,-1 ! 工作平面复位但不改变视图方向
asel,s,loc,x,-r0,r0 ! 选择圆面 A 的所有面
lsla,s ! 选择与圆面 A 相关的所有线
lesize,all,,,8 ! 对上述线设置网格划分个数为 8(三条边时相等且为偶数)
mshape,0,2d $ mshkey,1 ! 设置四边形单元、映射网格划分
amesh,all ! 圆面 A 划分网格
asel,s,loc,x,2*r0,4*r0 ! 选择圆面B的所有面
lsla,s ! 选择与圆面 B 相关的所有线
lesize,all,,,8 ! 对上述线设置网格划分个数为 8
lsel,r,length,,r0 ! 选择上述线中长度为半径的线
lesize,all,,,8,0.1,1 ! 设置这些线的网格划分数和间隔比
amesh,all $ allsel ! 圆面 B 划分网格

[转载]ANSYS圆、圆环面、圆柱面、圆柱体的网格划分

! 圆环的网格划分
finish $ /clear $ /prep7
et,1,plane82 $ r0=10 ! 定义单元类型和圆半径参数
cyl4,,,r0/3,,r0,90 $ cyl4,2*r0,,r0/10,,r0,90 ! 创建两个 1/4 环面
asel,s,loc,x,-r0,r0 ! 选择环面 A
lsla,s$lesize,all,,,8 ! 选择环面 A 的所有线,定义网分数
lsel,r,length,,r0*2/3 $ lesize,all,,,3,,1 ! 选择径向线,网分数修改为 3
mshape,0,2d $ mshkey,1 $ amesh,all ! 定义单元形状、划分类型、划分单元
ALLSEL $ asel,s,loc,x,2*r0,4*r0 ! 选择环面B
lesize,5,,,12 $ lesize,7,,,6 ! 定义外周线和内周线网分数分别为 12 和 6
lsel,s,length,,r0*9/10 $ lesize,all,,,7 ! 选择径向线,网分数为 7
amesh,all ! 划分环面 B 的单元网格

[转载]ANSYS圆、圆环面、圆柱面、圆柱体的网格划分
!圆柱面
finish
/clear
/prep7
r0=10 !定义圆半径
h0=50 !定义圆的高度
et,1,shell63 !定义单元类型
cyl4,,,r0
adele,1
cm,l1cm,line !将几何元素分组形成组元
k,50 !定义关键点
k,51,,,h0
l,50,51 !利用关键点定义线
adrag,l1cm,,,,,,5 !沿线拉伸成面
lsel,s,loc,z,0 !选择线
lesize,all,,,6 !对线指定网格尺寸
lsel,s,length,,h0 !选择线
lesize,all,,,8
mshape,0,2d !指定划分单元的形状
mshkey,1 !指定映射网格划分
amesh,all !在面中划分节点或线单元
[转载]ANSYS圆、圆环面、圆柱面、圆柱体的网格划分


!圆柱体
finish
/clear
/prep7
r0=10
h0=50
et,1,solid95
cyl4,,,r0,,,,h0
wprota,,90 !旋转工作平面
vsbw,all
wprota,,,90
vsbw,all !用工作平面分割体
mshape,0,3d !指定划分单元的形状
mshkey,1 !指定映射网格划分
lsel,s,loc,z,0
lesize,all,,,6
lsel,s,length,,h0
lesize,all,,,8
vmesh,all


[转载]ANSYS圆、圆环面、圆柱面、圆柱体的网格划分
[转载]ANSYS圆、圆环面、圆柱面、圆柱体的网格划分
[转载]ANSYS圆、圆环面、圆柱面、圆柱体的网格划分

我的更多文章

下载客户端阅读体验更佳

APP专享