求助：流道模型六面体网格划分

srafegbs

双螺杆反应器的流道模型，想用fliud142划分六面体网格，方便于模型加载求解，怎样做？
几何建模log文件如下，我加了注释：
/BATCH  
/COM,ANSYS RELEASE 10.0    UP20050718       13:55:59    01/14/2007
/input,menust,tmp,'',,,,,,,,,,,,,,,,1   
/GRA,POWER
/GST,ON
/PLO,INFO,3
/GRO,CURL,ON
/CPLANE,1   
/REPLOT,RESIZE  
WPSTYLE,,,,,,,,0
/FILNAME,Niehe_Q,1                       !定义工作文件名，并单独有log和err文件
/TITLE,quanniehe_w15rs25               
!*  
/NOPR   
KEYW,PR_SET,1   
KEYW,PR_MULTI,0
KEYW,PR_CFD,1   
/GO
!*  
/COM,   
/COM,Preferences for GUI filtering have been set to display:
/COM,  FLOTRAN CFD  
!*  
/units,si                          !单位制的设置
*AFUN,deg                          !角度单位的设置，为度

!几何参数设置
Rs=25                              !螺杆根径
Rb=38                              !螺棱半径
Rf=20                              !辅助圆半径
Rj=40                              !机筒半径
w=10                               !螺棱宽度
s=50                               !导程
Cl=65                              !中心距
Lj=150                             !计算域长度

!几何建模
/PREP7                             !进入前处理
CSYS,1                             !选择柱坐标系
!建立一个C型螺棱
!建立关键点
K,1,Rf,,,   
K, ,Rb,,,   
K, ,Rf,45,s/8,
K, ,Rb,45,s/8,
K, ,Rf,90,s/4,
K, ,Rb,90,s/4,
K, ,Rf,135,s/8+s/4,   
K, ,Rb,135,s/8+s/4,   
K, ,Rf,180,s/2,  
K, ,Rb,180,s/2,  
K, ,Rf,225,s/2+s/8,   
K, ,Rb,225,s/2+s/8,   
K, ,Rf,270,s/2+s/4,
K, ,Rb,270,s/2+s/4,
K, ,Rf,315,s-s/8,   
K, ,Rb,315,s-s/8,   
K, ,Rf,360,s,  
K, ,Rb,360,s,  
!建立曲面线
L,       1,       3                !连接关键点1，3
L,       3,       9                !连接关键点3，5，7，9
L,       9,      15                !连接关键点9，11，13，15
L,      15,      17                !连接关键点15，17
L,       2,      10
L,      10,      16
L,      16,      18     
FLST,2,4,4,ORDE,2                  ! 合并为两条线  
FITEM,2,1                           
FITEM,2,-4                          
LCOMB,P51X, ,0                        
FLST,2,3,4,ORDE,2                     
FITEM,2,5                           
FITEM,2,-7                          
LCOMB,P51X, ,0                        
FLST,3,2,4,ORDE,2                  !复制线并连接端点         
FITEM,3,1                           
FITEM,3,5                           
LGEN,2,P51X, , , , ,w, ,0                           
L,       1,       2                        
L,       2,      10                        
L,      10,       3                        
L,       3,       1                        
L,      17,      18                        
L,      18,      15                        
L,      15,       9                        
L,       9,      17
csys，0                           !将坐标系转回直角坐标系
/VIEW,1,1,1,1                     !预览图象的正等测图
/ANG,1  
/REP,FAST   
KPLOT
LPLOT   
!生成C型螺棱面
FLST,2,4,4                        !连接曲线生成六个面
FITEM,2,7                          !生成端面1
FITEM,2,8   
FITEM,2,4   
FITEM,2,6   
AL,P51X
FLST,2,4,4                         !生成辅助圆环面2
FITEM,2,2   
FITEM,2,8   
FITEM,2,1   
FITEM,2,12  
AL,P51X
FLST,2,4,4                         !生成侧面3
FITEM,2,7   
FITEM,2,2   
FITEM,2,3   
FITEM,2,11  
AL,P51X
/DIST,1,0.924021086472,1
FLST,2,4,4                          !生成螺棱面4
FITEM,2,10  
FITEM,2,5   
FITEM,2,3   
FITEM,2,6   
AL,P51X
/REP,FAST   
/DIST,1,0.924021086472,1
/REP,FAST   
FLST,2,4,4                         !生成侧面5
FITEM,2,4   
FITEM,2,5   
FITEM,2,1   
FITEM,2,9   
AL,P51X
FLST,2,4,4                         !生成端面6
FITEM,2,9   
FITEM,2,12  
FITEM,2,11  
FITEM,2,10  
AL,P51X
alist, all                        !显示所有面
!生成C型螺棱体
FLST,2,6,5,ORDE,2                 !生成一个C型螺棱体
FITEM,2,1   
FITEM,2,-6  
VA,P51X
FLST,3,1,6,ORDE,1                 !复制生成4个C型螺棱体
FITEM,3,1   
VGEN,4,P51X, , , , ,s, ,0   
CYLIND,Rs, ,-10,4*s+20,0,360,      !建立根径圆柱
vlist,all

[ 本帖最后由 srafegbs 于 2007-1-16 23:53 编辑 ]

srafegbs

伤心，没有人看，是不是我的东东不值求助呢

yjchen8

呵呵
楼主不用生气啊
是因为你的帖子太难懂了
所以大家都没有回帖啊
呵呵
不过我也属于那种看不懂的之列
哈哈！！！！！！！！！

ilovemm

lsel,,,,44
lsel,a,,,48
lsel,a,,,37
lsel,a,,,39
lesize,all,,,8
lsel,,,,45,46
lsel,a,,,43
lsel,a,,,41
lesize,all,,,20
lsel,,,,42
lsel,a,,,47
lsel,a,,,38
lsel,a,,,40
lesize,all,,,4
et,1,~~~~~~~~~~!
vmesh,4
雷同吧
比较麻烦的方法

ilovemm

发表于 2007-1-15 21:39  
晕了，谁顶上来的

mlhuan

现在对我们还是很有用的，谢谢。