单桩竖向承载力分析实例命令流
/prep7et,1,plane42
et,2,solid45
mp,ex,1,2.5e10
mp,nuxy,1,0.2
mp,dens,1,2500
mp,ex,2,2.5e8
mp,nuxy,2,0.4
mp,dens,2,2000
tb,dp,2
tbdata,1,19,32,30
rectng,0,1,0,8,
rectng,1,5,0,6,
rectng,0,5,0,-16
asel,s,,,2,3,1
aglue,all
numcmp,all
alls
aplot
lsel,s,,,1,3,2
lesize,all,,,2
lsel,s,,2,4,2
lsel,s,,,2,4,2
lesize,all,,,16
amesh,1
lsel,s,,,6,8,2
lesize,all,0.5
lsel,s,,,5
lesize,all,0.5
lsel,s,,,7
lesize,all,0.5
amesh,2
lsel,s,,,11
lesize,all,0.5
lsel,s,,,12
lesize,all,0.5
lsel,s,,,10
lesize,all,0.5
lsel,s,,,9
lesize,all,0.5
amesh,all
extopt,esize,2,0,
extopt,aclear,1
type,2
mat,1
vext,1,,,,,-1
extopt,esize,2,0
extopt,aclear,1
mat,2
vext,2,3,1,,,-1
alls
/view,1,1,1,1
eplor
k,1001,5,6,-5
k,1002,5,0,-5
k,1003,5,-16,-5
l,18,1001
l,1001,1002
l,1002,17
l,1002,1003
l,1003,21
al,22,36,37,38
al,30,38,39,40
vext,19,20,1,-5
vplot
vsel,s,,,4,5
vlpot
vplot
lsel,s,,,36,52
lesize,all,0.5
lplot
type,2
mat,2
vmesh,all
vsel,s,,,2,5
vplot
eslv,s
nslv,s,1
eplot
nummrg,all
numcmp,all
alls
/pnum,area,1
/view,1,1,1,1
/ang,1
/pnum,mat,1,2
eplot
alls
et,3,170
et,4,173
keyopt,4,9,0
keyopt,4,12,2
r,10
real,10
mp,mu,2,0.2
vsel,s,,,1
vplot
asel,s,,,4,6,1
aplot
cm,target,area
type,3
nsla,s,1
esurf,all
eplot
esel,s,type,,3
eplot
/psymb,esys,1
alls
vsel,s,,,2,5
vplot
asel,s,,,13
asel,a,,,17
asel,a,,,22
aplot
cm,contact,area
type,4
nsla,s,1
esurf,all
esel,s,type,,4
eplot
/psymb,esys,1
alls
gplot
finish
/solu
asel,s,loc,x,0
aplot
da,all,symm
asel,s,loc,x,5
da,all,all
aplot
asel,s,loc,z,-5
da,all,all
asel,s,loc,y,-16
da,all,all
alls
acel,0,9.8.0
acel,0,9.8,0
nsel,s,loc,y,8
esln,s
eplot
sfe,all,3,pres,,500
antype,static
nlgeom,on]
nlgeom,on
time,1
nsub,100
outres,all,all
alls
solv
finish :$ 没人顶自己顶 都没有消除重力引起的位移场 顶一个 不错的贴子,顶一个吧。学习 :@ :o :P :$ xiankan kan
支持~帮顶
支持,帮你顶一下,支持,帮你顶一下,支持,帮你顶一下 对,重力产生的位移是很大的,会失真 顶一个 好好好好好好好 好好~~~~顶~~~ 好,不错~~ 好,不错~~ 非常感谢楼主 非常感谢 学习后 再感谢 太及时了,谢谢楼主!!!!!!!!!!!!!!
页:
[1]