高手帮忙 ,毕业设计,急

浏览:63124
我做的是管土接触,原来忘加摩擦,那时算得是收敛,后来加摩擦因子f=0.4后不收敛了,求高手帮忙
fini
/clear
/filname,circ1
/prep7
*SET,di,0.6
*SET,detad,0.019
dii=di-2*detad
L=10
p_in=2.5e6
*SET,h,2*di
h1=3*di
*SET,width,3.5*di
*SET,height,h+di+h1
*SET,h,2*di
et,1,82,,,1
KEYOPT,1,3,2
mp,nuxy,1,0.26 管道
mp,ex,1,1.15e11
mp,dens,1,7200
mp,ex,2,1e7 回填土
mp,nuxy,2,0.35
mp,dens,2,18000/9.8
tb,dp,2
tbdata,1,1.1e4,32
mp,ex,3,8e7 地基
mp,nuxy,3,0.25
mp,dens,3,0
cyl4,,,dii/2,-90,di/2,90 管道
lsel,s,line,,1,3,2
lesize,all,,,40
asel,s,,,1
mshape,0,2d
mshkey,1
type,1
mat,1
amesh,all
allsel
numcmp,all
cyl4,,,,-90,di/2,90 土体
local,11,0,,-(h1+di/2)
wpcsys,11
rectng,0,width,0,height
asba,3,2
NUMCMP,ALL
wpoffs,,h1
WPROTA,,90
ASEL,S,area,,2
asbw,all
numcmp,all
allsel
lsel,s,,,5
lesize,all,,,20
asel,s,,,2,3
smrtsize,1
mshape,0,2d
mshkey,0
amesh,all
alls
ET,3,TARGE169
ET,4,CONTA172
keyopt,4,4,1
keyopt,4,9,0
keyopt,4,12,2
r,1,,,1,1,,,
rmore,,,,,,5
mp,mu,4,0.4
allsel
lsel,s,line,,1
nsll,s,1
type,4
real,2
esurf,all
lsel,s,line,,5
nsll,s,1
type,3
esurf,all
allsel,all

asel,s,area,,3
esla,r
mpchg,2,all
allsel
asel,s,area,,2
esla,r
mpchg,3,all
allsel
/SOL
csys,0
lsel,s,loc,x,width
dl,all,,ux
allsel
lsel,s,loc,x,0
dl,all,,ux
allsel
lsel,s,,,6
dl,all,,uy
outpr,all
outres,all
csys,0
acel,,9.8
time,1
deltim,0.1
autots,on
nlgeom,on
pred,on
lnsrch,on
solve
邀请回答 我来回答

当前暂无回答

回答可获赠 200金币

没解决?试试专家一对一服务

换一批
    App下载
    技术邻APP
    工程师必备
    • 项目客服
    • 培训客服
    • 平台客服

    TOP