FINI
/CLE
/AUX15  
IGESIN,EX7-1,IGES
/VIEW,1,1,1,1   
/ANG,1
/REP,FAST
FINISH
/FILENAME,EX7-1,1
/TITLE,the CFD analysis of honeycomb duct
/PREP7
ET,1,FLUID141
!
MSHKEY,0
MSHAPE,0,2D
MSHMID,2
LESIZE,1,,,15,-3 
LESIZE,3,,,15,-3 
LESIZE,5,,,15,1
LESIZE,7,,,15,1
LESIZE,8,,,30,-3
LESIZE,10,,,30,-3
LESIZE,11,,,15,1     
LESIZE,13,,,15,1
LESIZE,16,,,15,-3
LESIZE,14,,,15,-3   
LESIZE,4,,,10,-3
LESIZE,2,,,10,-3  
LESIZE,6,,,10,-3 
LESIZE,9,,,10,-3
LESIZE,12,,,10,-3  
LESIZE,15,,,10,-3 
ALLSEL,ALL
AMESH,ALL
EPLOT
SAVE
!
DL,4,,VX,3,1
DL,4,,VY,0,1
!
DL,1,,VX,0,1
DL,1,,VY,0,1
DL,3,,VX,0,1
DL,3,,VY,0,1
DL,5,,VX,0,1
DL,5,,VY,0,1
DL,7,,VX,0,1
DL,7,,VY,0,1
DL,8,,VX,0,1
DL,8,,VY,0,1
DL,10,,VX,0,1
DL,10,,VY,0,1
DL,11,,VX,0,1
DL,11,,VY,0,1
DL,13,,VX,0,1
DL,13,,VY,0,1
DL,14,,VX,0,1
DL,14,,VY,0,1
DL,16,,VX,0,1
DL,16,,VY,0,1
!
DL,15,,PRES,0,1
SAVE
/SOLU
FLDATA2,ITER,EXEC,40 
FLDATA8,NOMI,DENS,1.0  
FLDATA8,NOMI,VISC,0.008 
SAVE
SOLVE
FINISH           
/POST1
SET,LAST
PLNSOL,PTOT,,0             !圖形顯示總應(yīng)力
PLVECT,V,,,,VECT,ELEM,ON,0 !速度矢量圖形顯示
PATH,outpath,2,30,20       !定義路徑
PPATH,1,837
PPATH,2,852
PDEF,,V,X                  !映射數(shù)據(jù)到路徑
/AXLAB,Y,VELOCITY          !定義圖表Y軸名稱
PLPATH,VX                  !圖表顯示路徑數(shù)據(jù)
PRPATH,VX                  !列表顯示路徑數(shù)據(jù)
/EXIT,ALL