mzj5000 发表于 2008-7-25 15:02

水管的耦合问题算例

本帖最后由 hypo_qu 于 2009-5-11 19:21 编辑

水管的耦合问题算例.doc

mzj5000 发表于 2008-7-25 15:05

水管的耦合问题算例.doc

1.问题描述：一根弯管，里面有流体入口流体速度10m/s ，开放出口压力（opening），管道两端固支。现在想用ansys和cfx的MFX的流固耦合做个练习，观察在水流冲击下管道的变形情况。
2.模型描述：


管道模型，网格，边界条件和接触面apdl
/prep7
                        !Selection tolerance

!set element type
et,1,shell63   ! 3-D 20-Node Structural
R,1,0.01, , , , , ,

!!set material
mp,ex,1,2.1E11                        !Young modulus
mp,prxy,1,0.3                                !Poisson coefficient
mp,dens,1,7800

!simple pipe model
k,1,
k,2,1
k,3,0,1
l,1,2
l,1,3
LFILLT,2,1,0.25, ,
LPLOT   
WPSTYLE,,,,,,,,1
KWPAVE,       2
wpro,,,-90.000000
CSYS,4

CYL4, , , ,0,0.1,90
CYL4, , , ,-90,0.1,0

VDRAG,1,2 , ,, , ,1,3,2
vglue,all
vdele,all,,0
aplot

FLST,2,6,5,ORDE,6   
FITEM,2,4   
FITEM,2,12
FITEM,2,20
FITEM,2,30
FITEM,2,33
FITEM,2,36
ADELE,P51X, , ,1


FLST,2,7,5,ORDE,7   
FITEM,2,5   
FITEM,2,-6
FITEM,2,13
FITEM,2,-14
FITEM,2,21
FITEM,2,28
FITEM,2,31
ADELE,P51X, , ,1


FLST,2,4,5,ORDE,4   
FITEM,2,1   
FITEM,2,22
FITEM,2,27
FITEM,2,34
ADELE,P51X, , ,1
aglue,all

type,1
mat,1
real,1
esize,0.03
MSHAPE,0,2D
MSHKEY,1
Amesh,all

!boundary condition
nsel,s,loc,x,0
D,all, , , , , ,ALL, , , , ,
nsel,s,loc,z,0
D,all, , , , , ,uz, , , , ,
allsel,all


!set fsi condition                  
sf,all,fsin,1
allsel
save

cdwrite,db,example_shell,cdb
finish
流体模型，网格，边界集合apdl

mzj5000 发表于 2008-7-25 15:17

怎么发附件？

我怎么不能发附件？

huxiaoqi 发表于 2008-12-1 18:14

很好，最好能发个完整的附件看看
页: [1]
查看完整版本: 水管的耦合问题算例