shenyin113 发表于 2010-11-2 10:47

哪位大神帮小弟看看这个模型改什么参数能收敛,小弟刚学不太会。

/prep7
et,1,42 $et,2,169$et,3,172 $keyopt,3,12,2 $keyopt,3,9,0!定义单元类型和实常数
mp,ex,1,3e8 $mp,nuxy,1,0.3$mp,dens,1,2500   !定义船闸闸首材料
mp,ex,2,3e7 $mp,nuxy,2,0.4$mp,dens,2,2000$mp,mu,2,0.3!定义土线性材料属性
tb,dp,2
tbdata,1,19,32!定义土的非线性
!闸首建模
k,1,0,0
k,2,10,0
k,3,30,0
k,4,40,0
k,5,40,30
k,6,30,30
k,7,30,5
k,8,10,5
k,9,10,30
k,10,0,30
a,1,2,9,10
a,2,3,7,8
a,3,4,5,6
asel,s,,,1,3,1
aglue,all
numcmp,all
esize,2.5
type,1
mat,1
amesh,all

!土体建模

rectng,-40,0,0,30
rectng,-40,0,-50,0
rectng,0,40,-50,0
rectng,40,80,-50,0
rectng,40,80,0,30
asel,s,,,4,8,1
aglue,all
numcmp,all
esize,2.5
type,1
mat,2
amesh,all

!接触面设定
r,10

real,10
lsel,s,,,3
lsel,a,,,1
lsel,a,,,4
lsel,a,,,8
lsel,a,,,9
nsll,s,1
type,2
esurf,all

lsel,s,,,14
lsel,a,,,25
lsel,a,,,27
nsll,s,1
type,3
esurf,all

allsel
finish

!施加荷载
/solu
allsel
acel,0,9.8,0
lsel,s,loc,x,-40
lsel,a,loc,x,80
lsel,a,loc,y,-50
nsll,s,1
d,all,all
allsel
time,1
nsubst,100
solv

shenyin113 发表于 2010-11-3 17:02

回复 shenyin113 的帖子

顶起啊 哪位大神帮帮忙啊
页: [1]
查看完整版本: 哪位大神帮小弟看看这个模型改什么参数能收敛,小弟刚学不太会。