- 积分
- 0
- 注册时间
- 2010-8-30
- 仿真币
-
- 最后登录
- 1970-1-1
|
下面是一个管道的模型,小弟欲做流固耦合的flotran分析,但不会划分网格,希望各位多多指点!
fini
/clear,all
/prep7
r=15 ! radius of spring
ro=1 !outer radius of the tube
ri=0.9
n=20 ! segment number in the tube
s=2.1 ! lead
pi=3.14159265
! create keypoints
*do,i,1,8*n+1,1
al=(i-1)/16
x=(r+al)*cos((pi*(i-1))/8)
y=(r+al)*sin((pi*(i-1))/8)
z=((i-1)/16)*s
k,i,x,y,z
*enddo
*do,i,1,8*n-4,5
bsplin,i,i+1,i+2,i+3,i+4,i+5
*enddo
lcomb,all
wpro,,90 ! rotation work plane to 90 degree around x axis
cyl4,kx(1),ky(1),ro,,ri,360 ! draw section of tube
cyl4,kx(1),ky(1),ri,,,360 !draw section of fluid
aglue,1,2
numcmp,all
wpro,,-90 ! resume direction of work plane
vdrag,1,2,,,,,1 |
|