圆盘划分网格问题，本人新手，求指导，谢谢

枯木小熊

如何将一个直径25毫米，厚度20毫米的圆盘，划分成左图里面 标准的上下竖直的小正方形，而且大小差不多。我每次都只能化成如右图所示的斜的，求指导，谢谢！

htbbzzg

可以先对 1/4 圆柱建模和划分网格，期间需要对模型进行一些切割，以便把要求网格比较整齐的区域切割为矩形，然后再一起划分网格。
我做了一个小例子，仅对 1/4 圆柱建模和划分网格，然后可以进行对称 (reflect) 操作，将模型扩展到整个圆柱 (4 个 1/4 圆柱)，再通过 NUMMRG 命令将他们合并为一个完整的圆柱。以下是 1/4 圆柱建模和划分网格的命令流，对称操作和合并模型操作请自己做。相应的网格图见附图。可以调整命令流中所设置的网格尺寸来改变网格质量：本命令流中设置网格尺寸 0.6，减小这一尺寸会使网格质量得到改善。
命令流如下：

fini
/clear
/filname, mesh_test
!*
/PREP7  
!*  
ET,1,SOLID185   
!*  
WPSTYLE,,,,,,,,1
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,1,,210000
MPDATA,PRXY,1,,0.3  
CYL4, , ,0,0,12.5,90,20
!*

!*  
FLST,2,3,3,ORDE,3   
FITEM,2,1   
FITEM,2,3   
FITEM,2,5   
KWPAVE,P51X
wpro,,90.000000,
VSBW,       1   
!*   
FLST,2,3,3,ORDE,3   
FITEM,2,1   
FITEM,2,-2  
FITEM,2,4   
KWPAVE,P51X
wpro,,,90.000000
!*   
FLST,2,2,6,ORDE,2   
FITEM,2,2   
FITEM,2,-3  
VSBW,P51X   
!*
FLST,2,2,3,ORDE,2   
FITEM,2,1   
FITEM,2,15  
KWPAVE,P51X
!*
FLST,2,2,6,ORDE,2   
FITEM,2,4   
FITEM,2,6   
VSBW,P51X   
!*
FLST,2,2,3,ORDE,2   
FITEM,2,12  
FITEM,2,15  
KWPAVE,P51X
wpro,,,-90.000000   
!*
FLST,2,3,6,ORDE,3   
FITEM,2,3   
FITEM,2,5   
FITEM,2,8   
VSBW,P51X   
!*
TYPE,   1   
MAT,       1
REAL,   
ESYS,       0   
SECNUM,
!*  
LESIZE,ALL,0.6, , , ,1, , ,1,             !  设置单元边长，减小单元边长可以得到更好的网格
!*  
!*  
MSHAPE,0,3d
MSHKEY,1
VMESH,all   
MSHKEY,0
!*  

枯木小熊

htbbzzg 发表于 2013-6-16 10:39
可以先对 1/4 圆柱建模和划分网格，期间需要对模型进行一些切割，以便把要求网格比较整齐的区域切割为矩形 ...

谢谢大神指导，但是您发的代码好像乱码了，可以再发一份到我的邮箱吗，346754637@qq.com 非常感谢了

huajun_ming

枯木小熊 发表于 2013-6-16 14:27
谢谢大神指导，但是您发的代码好像乱码了，可以再发一份到我的邮箱吗， 非常感谢了 ...

2楼发的不是乱码啊，我将他的代码用代码格式贴在下面吧。只是2楼你的网格局部太细了吧？

1. fini
   
2. /clear
   
3. /filname, mesh_test
   
4. !*
   
5. /PREP7  
   
6. !*  
   
7. ET,1,SOLID185   
   
8. !*  
   
9. WPSTYLE,,,,,,,,1
   
10. !*  
    
11. MPTEMP,,,,,,,,  
    
12. MPTEMP,1,0  
    
13. MPDATA,EX,1,,210000
    
14. MPDATA,PRXY,1,,0.3  
    
15. CYL4, , ,0,0,12.5,90,20
    
16. !*
    
17. 
    
18. !*  
    
19. FLST,2,3,3,ORDE,3   
    
20. FITEM,2,1   
    
21. FITEM,2,3   
    
22. FITEM,2,5   
    
23. KWPAVE,P51X
    
24. wpro,,90.000000,
    
25. VSBW,       1   
    
26. !*   
    
27. FLST,2,3,3,ORDE,3   
    
28. FITEM,2,1   
    
29. FITEM,2,-2  
    
30. FITEM,2,4   
    
31. KWPAVE,P51X
    
32. wpro,,,90.000000
    
33. !*   
    
34. FLST,2,2,6,ORDE,2   
    
35. FITEM,2,2   
    
36. FITEM,2,-3  
    
37. VSBW,P51X   
    
38. !*
    
39. FLST,2,2,3,ORDE,2   
    
40. FITEM,2,1   
    
41. FITEM,2,15  
    
42. KWPAVE,P51X
    
43. !*
    
44. FLST,2,2,6,ORDE,2   
    
45. FITEM,2,4   
    
46. FITEM,2,6   
    
47. VSBW,P51X   
    
48. !*
    
49. FLST,2,2,3,ORDE,2   
    
50. FITEM,2,12  
    
51. FITEM,2,15  
    
52. KWPAVE,P51X
    
53. wpro,,,-90.000000   
    
54. !*
    
55. FLST,2,3,6,ORDE,3   
    
56. FITEM,2,3   
    
57. FITEM,2,5   
    
58. FITEM,2,8   
    
59. VSBW,P51X   
    
60. !*
    
61. TYPE,   1   
    
62. MAT,       1
    
63. REAL,   
    
64. ESYS,       0   
    
65. SECNUM,
    
66. !*  
    
67. LESIZE,ALL,0.6, , , ,1, , ,1,             !  设置单元边长，减小单元边长可以得到更好的网格
    
68. !*  
    
69. !*  
    
70. MSHAPE,0,3d
    
71. MSHKEY,1
    
72. VMESH,all   
    
73. MSHKEY,0

复制代码

huajun_ming

枯木小熊 发表于 2013-6-16 14:27
谢谢大神指导，但是您发的代码好像乱码了，可以再发一份到我的邮箱吗， 非常感谢了 ...

我看你的图1，发现其实网格划分是很有规律的，于是按照2楼的想法，试了试，发现还真可以。
好久没用ANSYS了，用鼠标操作的，因此可能有些重复的操作。
我的想法是：首先生成一个圆，我生成的是半径为25的圆，然后生成一些点，点的目的是为了生成几个直线，直线的目的是为了将圆切割成一些小块，这样可以对每小块的边分成几部分来得到网格的边。
直接上图：

相应的代码是：（注：由于好久没有用ANSYS，所以没有对代码进行编辑，纯粹是使用File→write DB log file..输出得到的）

1. /PREP7
   
2. ET,1,PLANE182
   
3. CYL4,0,0,25
   
4. K, ,0,-25,,
   
5. K, ,25,0,,
   
6. K, ,0,25,,
   
7. K, ,-25,0,,
   
8. K, ,-25,0,,
   
9. LSTR, 1, 3
   
10. LSTR, 2, 4
    
11. K, ,-15,-25,,
    
12. K, ,-15,25,,
    
13. K, ,15,25,,
    
14. K, ,15,-25,,
    
15. K, ,15,-25,,
    
16. LSTR, 11, 10
    
17. LSTR, 12, 13
    
18. K, ,-25,10,,
    
19. K, ,-25,-10,,
    
20. K, ,25,-10,,
    
21. K, ,25,10,,
    
22. LSTR, 15, 18
    
23. LSTR, 16, 17
    
24. FLST,3,10,4,ORDE,2
    
25. FITEM,3,1
    
26. FITEM,3,-10
    
27. ASBL, 1,P51X
    
28. FLST,2,27,3,ORDE,5
    
29. FITEM,2,1
    
30. FITEM,2,-9
    
31. FITEM,2,14
    
32. FITEM,2,19
    
33. FITEM,2,-35
    
34. KDELE,P51X
    
35. FLST,5,1,4,ORDE,1
    
36. FITEM,5,31
    
37. CM,_Y,LINE
    
38. LSEL, , , ,P51X
    
39. CM,_Y1,LINE
    
40. CMSEL,,_Y
    
41. LESIZE,_Y1, , ,10, , , , ,1
    
42. FLST,5,1,4,ORDE,1
    
43. FITEM,5,28
    
44. CM,_Y,LINE
    
45. LSEL, , , ,P51X
    
46. CM,_Y1,LINE
    
47. CMSEL,,_Y
    
48. LESIZE,_Y1, , ,10, , , , ,1
    
49. FLST,5,14,4,ORDE,11
    
50. FITEM,5,12
    
51. FITEM,5,15
    
52. FITEM,5,18
    
53. FITEM,5,21
    
54. FITEM,5,29
    
55. FITEM,5,-30
    
56. FITEM,5,32
    
57. FITEM,5,38
    
58. FITEM,5,-42
    
59. FITEM,5,44
    
60. FITEM,5,46
    
61. CM,_Y,LINE
    
62. LSEL, , , ,P51X
    
63. CM,_Y1,LINE
    
64. CMSEL,,_Y
    
65. LESIZE,_Y1, , ,10, , , , ,1
    
66. FLST,5,16,4,ORDE,9
    
67. FITEM,5,13
    
68. FITEM,5,16
    
69. FITEM,5,19
    
70. FITEM,5,22
    
71. FITEM,5,-27
    
72. FITEM,5,33
    
73. FITEM,5,-37
    
74. FITEM,5,43
    
75. FITEM,5,45
    
76. CM,_Y,LINE
    
77. LSEL, , , ,P51X
    
78. CM,_Y1,LINE
    
79. CMSEL,,_Y
    
80. LESIZE,_Y1, , ,8, , , , ,1
    
81. FLST,5,4,4,ORDE,4
    
82. FITEM,5,11
    
83. FITEM,5,14
    
84. FITEM,5,17
    
85. FITEM,5,20
    
86. CM,_Y,LINE
    
87. LSEL, , , ,P51X
    
88. CM,_Y1,LINE
    
89. CMSEL,,_Y
    
90. LESIZE,_Y1, , ,12, , , , ,1
    
91. MSHAPE,0,2D
    
92. MSHKEY,1
    
93. FLST,5,16,5,ORDE,2
    
94. FITEM,5,2
    
95. FITEM,5,-17
    
96. CM,_Y,AREA
    
97. ASEL, , , ,P51X
    
98. CM,_Y1,AREA
    
99. CHKMSH,'AREA'
    
100. CMSEL,S,_Y
     
101. AMESH,_Y1
     
102. CMDELE,_Y
     
103. CMDELE,_Y1
     
104. CMDELE,_Y2

复制代码

枯木小熊

huajun_ming 发表于 2013-6-17 23:22
我看你的图1，发现其实网格划分是很有规律的，于是按照2楼的想法，试了试，发现还真可以。
好久没用A ...

非常感谢，我还是新手，代码还不熟，谢谢啦

yangwk43090404

htbbzzg 发表于 2013-6-16 10:39
可以先对 1/4 圆柱建模和划分网格，期间需要对模型进行一些切割，以便把要求网格比较整齐的区域切割为矩形 ...

网格尺寸能无限大吗？

htbbzzg

你的问题有点奇怪：网格尺寸无限大是不可能的。不知为什么你需要网格尺寸无限大？你的结构模型本身也不是无限大啊？
此外，网格尺寸越大，划分网格时越容易出问题，而且结果的精度也越差。