tangaoming 发表于 2006-7-8 11:12

划分网络出现的问题！

我这个是地基基础非线性分析，但是在划分网络时，基础形状不是规则的，所以中间老出现三角形单元，我要四边形单元该怎么划分，命令流和图形见图
/prep7
et,1,plane42
et,2,solid45
mp,ex,1,2.5e10
mp,nuxy,1,0.16
mp,dens,1,2700
mp,ex,2,10e6
mp,nuxy,2,0.45
mp,dens,2,2000
tb,dp,2
tbdata,1,10000,30,30
!建立各个关键点
k,1
k,2,1.5
k,3,1.5,0.4
k,4,1.1,0.4
k,5,1.1,0.8
k,6,0.7,0.8
k,7,0.7,1.2
k,8,0.3,1.2
k,9,0.3,2
k,10,0,2
k,11,4,2
k,12,4,0
k,13,4,-2
k,14,0,-2
k,15,0.3,3
k,16,0,3
!建立各条线，面元素
*do,i,1,9,1
l,i,i+1
*enddo
l,10,1
al,1,2,3,4,5,6,7,8,9,10
l,9,11
*do,i,11,13,1
l,i,i+1
*enddo
l,14,1
l,2,12
al,2,3,4,5,6,7,8,11,12,16
al,1,16,13,14,15
l,9,15
l,15,16
l,16,10
al,9,17,18,19
/pnum,area,1
/pnum,line,1
aplot
!划分网络
lsel,s,,,2,8,1
lesize,all,0.2
lsel,s,,,9
lesize,all,0.15
lsel,s,,,10
lesize,all,0.2
lsel,s,,,1
lesize,all,,,8
amesh,1
lsel,s,,,11
lesize,all,0.2
lsel,s,,,12
lesize,all,0.2
lsel,s,,,16
lesize,all,0.2
amesh,2
lsel,s,,,15
lesize,all,0.2
lsel,s,,,14
lesize,all,,,21
lsel,s,,,13
lesize,all,0.2
amesh,3
lsel,s,,,17,19,2
lesize,all,0.2
lsel,s,,,18
lesize,all,,,2
amesh,4
finish

sysh320 发表于 2006-7-8 16:31

我看了你的命令流，问题出现在lsel,s,,,1   ，lesize,all,,,8这两句上，直线1平分成8份是不对的。因线段9分成两份，单元长0.15，而线段3、5、7的单元长度是0.2，这样根本对不上，划分网格的时候出现了三角形单元。你把这句改一下就可以了。

tangaoming 发表于 2006-7-9 00:18

那怎么改呢？就是不知道该怎么改

tangaoming 发表于 2006-7-9 00:21

而且我这个命令在划分面2时就没有你说的那种情况，但是还是出现三角形单元，这个怎么解释呢

sysh320 发表于 2006-7-11 16:21

再建立一个关键点,坐标是(0.3,0),划分网格时使上下对照就可以了,你这个问题不难解决的,自己多试试

tangaoming 发表于 2006-7-11 16:44

不是很明白，你能帮我把命令流修改了，然后发给我，我看看，可以吗？谢谢

sysh320 发表于 2006-7-11 17:33

好的,我再看看,尽快\给你解答

panwang 发表于 2006-7-12 08:53

这样可以吗?我在10.0里面画的，没有修改。

1

tangaoming 发表于 2006-7-12 09:04

不行呀，我想画出去全是规整的，为什么同样的命令在不同的版本划出来不一样呢

sysh320 发表于 2006-7-12 09:37

版本不一样，有差别是可以理解的！

panwang 发表于 2006-7-12 10:00

那你多加几个k,把不规则的再分成4块，或用耦合或者glue。这次可以吗？

1

sysh320 发表于 2006-7-12 10:22

还是在你原来的命令流基础上，我作了适当的修改，结果如下。

sysh320 发表于 2006-7-12 10:23

/prep7
et,1,plane42
et,2,solid45
mp,ex,1,2.5e10
mp,nuxy,1,0.16
mp,dens,1,2700
mp,ex,2,10e6
mp,nuxy,2,0.45
mp,dens,2,2000
tb,dp,2
tbdata,1,10000,30,30
!建立各个关键点
k,1
k,2,0.3
k,3,1.5
k,4,1.5,0.4
k,5,1.1,0.4
k,6,1.1,0.8
k,7,0.7,0.8
k,8,0.7,1.2
k,9,0.3,1.2
k,10,0.3,2
k,11,0,2
k,12,4,2
k,13,4,0
k,14,4,-2
k,15,0,-2
k,16,0.3,3
k,17,0,3
k,18,0.3,-2
!建立面元素
a,1,2,3,4,5,6,7,8,9,10,11
l,2,9
/pnum,area,1
/pnum,line,1
asbl,1,22
a,3,4,5,6,7,8,9,10,12,13
a,1,2,3,13,14,18,15
l,2,18
asbl,3,23
a,10,11,17,16
aglue,1,2,4,5,6,7
aplot
!划分网络
lsel,s,,,2,9,1
lesize,all,0.2
lsel,s,,,22
lesize,all,0.2
amesh,6
lsel,s,,,1
lesize,all,0.15
lsel,s,,,10
lesize,all,0.15
lsel,s,,,11
lesize,all,0.2
amesh,5
lsel,s,,,12,14,1
lesize,all,0.2
amesh,2
lsel,s,,,15
lesize,all,0.2
lsel,s,,,16
lesize,all,0.2
lsel,s,,,23
lesize,all,0.2
amesh,7
lsel,s,,,18
lesize,all,0.2
lsel,s,,,17
lesize,all,0.15
amesh,1
lsel,s,,,20
lesize,all,0.15
lsel,s,,,19
lesize,all,0.2
lsel,s,,,21
lesize,all,0.2
amesh,4
finish

sysh320 发表于 2006-7-12 10:25

这是我划分的结果！

1

sysh320 发表于 2006-7-12 10:27

图中是显示问题，和你那个差不多，应该就是这了！
不过你的命令流有点繁琐，可以简化的。
要是用MAPPED，效果可能会更好，只需把线相连（LCCAT)就可以了
你可以自己摸索看看，呵呵
页: [1] 2
查看完整版本: 划分网络出现的问题！