beam with rib.txt

ansys.com上的ansys命令流,主要为热,流体,接触分析方面的内容

finish
/clear 
/prep7 
/TITLE,membrane analysis 
ANTYPE,STATIC            ! STATIC ANALYSIS 
  
!本次计算采用的是国际标准单位 
!定义单元类型及特性 
ET,1,SHELL63,,,2 
R,1,.00005               ! PLATE THICKNESS 
  
!*************** 
MP,EX,1,190e9 
MP,DENS,1,.007 
MP,NUXY,1,0.3 
  
et,2,beam4 
  
!*************** 
MP,EX,2,195e9 
MP,DENS,2,.0078 
MP,NUXY,2,0.3 
R,2,1e-6,1e-12/12,1e-12/12,0.001,0.001      !定义梁的截面面积（或其它特性） 
  
!建立实体模型 
cyl4,,,0.01 
  
!将膜上有梁的位置处用工作平面切割， 
!并在划分网格时将在梁的位置所生成的直线 
!与梁划分的网格数设置相同，以便后续进行 
!梁与膜的固接处理。 
wprota,,90 
asbw,1,,delete 
wprota,,,90 
asbw,all,,delete 
wprota,,,45 
asbw,all,,delete 
wprota,,,-90 
asbw,all,,delete 
NUMCMP,all   !压缩面、线、关键点编号 
             !以便后面控制 
  
!对膜进行网格划分 
lsel,s,,,4,8,1   !选择面的边线并设置分割份数 
lsel,a,,,2 
lsel,a,,,10,15,15-10          
lesize,all,,,10  !10 divisions every line 
  
allsel 
lsel,s,,,11,14,1  !选择面的边线并设置分割份数 
lsel,a,,,1,3,2 
lsel,a,,,9,16,16-9 
lesize,all,,,10   !10 divisions every line 
allsel,all 
  
!用设置的单元类型1，材料特性1，实常数1， 
!对膜进行映射网格划分 
type,1 
mat,1 
real,1 
MSHKEY,1   !使用映射网格划分 
amesh,all 
  
!添加梁单元:10 divisions every line 
  
ksll,s !产生double节点
KGEN,2,all 
ksll,u 
  
!在加梁处生成直线并设置网格10 divisions every line 
l,10,14,10    
l,11,14,10 
l,12,14,10 
l,13,14,10 
l,15,14,10 
l,16,14,10 
l,17,14,10 
l,18,14,10 
lsla,u !选择不属于面的线
  
!对上述生成的线进行网格划分，生成梁单元 
!用设置的单元类型2，材料特性2，实常数2 
type,2 
mat,2 
real,2 
lmesh,all 
  
allsel,all 
eplot 
nummrg,all   !合并梁和膜相接触的所有关键点 
       !及节点，即将梁固接在膜上。 
FINISH 
  
/solu 
!加载 
!约束加在整个膜的边缘 
!压力均匀加在梁上 
lsel,s,,,11,14,1   !选择膜的边界线 
lsel,a,,,1,3,2 
lsel,a,,,9,16,16-9 
  
dl,all,,all,0          !约束膜的边界 
allsel,all 
  
!************** 
sfa,all,,PRES,50000 
  
!求解(默认：波前直接求解器) 
SOLVE 
FINISH 
  
!后处理 
!显示等效应力彩云图 
/post1 
PLNSOL,s,eqv,0 
/eshape,1
plnsol,s,eqv