cavity2_map.txt

很强的有限元分析软件ansys55的源码

/PREP7  
lengtha1=1.5
lengthb1=0.3
lengtha2=1.5
lengthb2=0.3
lengthz=0.4
div=30
!
DENS,1,1.21         ! (Rho) density of air 
SONC,1,340          ! (C) speed of sound in air
!
K,1,lengtha1,lengthb1,0,  ! to build a geometry model
K,2,lengtha1,0,0,  
K,3,0,lengthb1,0,  
K,4,0,0,0,  
LSTR,       4,       2  
LSTR,       4,       3  
LSTR,       3,       1  
LSTR,       1,       2  
FLST,2,4,4  
FITEM,2,2   
FITEM,2,3   
FITEM,2,4   
FITEM,2,1   
AL,P51X 
K,5,0,0,lengthz,  
K,6,lengtha2,0,lengthz,  
K,7,0,lengthb2,lengthz,  
K,8,lengtha2,lengthb2,lengthz,  
LSTR,       5,       7  
LSTR,       8,       7  
LSTR,       8,       6  
LSTR,       6,       5  
FLST,2,4,4  
FITEM,2,5   
FITEM,2,6   
FITEM,2,7   
FITEM,2,8   
AL,P51X 
LSTR,       7,       3  !to build the other four areas
LSTR,       8,       1  
LSTR,       5,       4  
LSTR,       6,       2  
FLST,2,4,4  
FITEM,2,8   
FITEM,2,11  
FITEM,2,1   
FITEM,2,12  
AL,P51X 
FLST,2,4,4  
FITEM,2,11  
FITEM,2,5   
FITEM,2,2   
FITEM,2,9   
AL,P51X 
FLST,2,4,4  
FITEM,2,6   
FITEM,2,9   
FITEM,2,3   
FITEM,2,10  
AL,P51X 
FLST,2,4,4  
FITEM,2,4   
FITEM,2,10  
FITEM,2,12  
FITEM,2,7   
AL,P51X 
FLST,2,6,5,ORDE,2   !to build a volume
FITEM,2,1   
FITEM,2,-6  
VA,P51X 
ET,3,FLUID29        !define three kinds of elements
ET,1,FLUID30
ET,2,FLUID30
KEYOPT,2,2,1
!mesh a area         !use map method to mesh a volume(not vsweep method)
FLST,5,12,4,ORDE,2  
FITEM,5,1   
FITEM,5,-12 
CM,_Y,LINE  
LSEL, , , ,P51X 
!*  
CM,_Y1,LINE 
CMSEL,,_Y   
LESIZE,_Y1, , ,30,1,
CMDEL,_Y
CMDEL,_Y1   
!*  
CM,_Y,VOLU  
VSEL, , , ,       1 
CM,_Y1,VOLU 
CHKMSH,'VOLU'   
CMSEL,S,_Y  
!*  
MSHAPE,0,3d 
MSHKEY,1
VMESH,_Y1   
MSHKEY,0
!*  
CMDEL,_Y
CMDEL,_Y1   
CMDEL,_Y2   
!* 
NUMCMP,ELEM                            !compress the number of elements
!这样不需要通过座标选节点,先选面，然后选面上的节点 
ASEL,all 
NSLA,S,1              !"nsla"=n(node)+sla(selected area)
D,ALL,UX,,,,,UY,UZ    ! Constrain all displacements to zero at the walls  
enode
EINV
TYPE,2  
EMODIF,ALL            ! Interior elements are specified as Type=2 and material=3
nsel,all
esel,all              !关键：如果批处理最后一行命令不回车，该命令不被执行