我自己想用ansys做一个基坑双排桩的模型，计算结果一直不收敛，请各位大侠看看我的编的错在哪里，俺是新手~~~~~，忘不吝赐教啊 __3s3YG
finish yx@%x?B
/clear )'+
tb\g
/filname shuangpaizhuang 1 '[Ue0r<jn
/prep7 InAx;2'A:
!建立模型,beam3模拟桩和横梁,plane42模拟土体 1 iiQW
et,1,beam3 dr[sSBTY"
et,2,plane42 \[> Ob
keyopt,2,3,2 !设置成平面应变 x A&RMu&
r,1,0.15,0.000281,0.15 :r BPgrt
mp,ex,1,25e9 !混凝土采用C25 #80 [q3
mp,nuxy,1,0.2 m BrH`!
mp,dens,1,2500 -lb,0
mp,ex,2,6e9 @U 6jd4?)
mp,nuxy,2,0.3 7xhBdi[ dQ
mp,dens,2,1800 +sW;p?K7eO
tb,dp,2 , Vc>'4E-
tbdata,1,1e4,15 !定义粘聚力和内摩擦角 mw\
z'
save I<``d Ne9Q
!建平面模型 #Ns]l<
rectng,0,-15,-6,10 1Z h4)6x
rectng,0,2.5,-6,14 ]UMt
rectng,2.5,15,-6,14 L/[b~D>T%
nummrg,all !合并元素 6H #4iMeh
numcmp,all !压缩编号 TEzMFu+V
/pnum,line,on !显示线,节点,面积编号 C'wRF90
/pnum,area,on 9sgyg3fv>5
/pnum,node,on 6w"_sK?
/replot (/^s?`1{N?
!划分网格,尺寸0.5m WLy%| {/
asel,all !划分土体 G[bWjw86O
aatt,2,,2 R [[
#r5q
lsel,all }%T8?d]
lesize,all,0.5 [J{M'+a
asel,all ~fht [S?@M
amesh,all
js$L<^7
save G0izZW c
finish _, ki/7{
type,1 !生成混凝土桩和梁单元 ?_@_NV MY
mat,1 P,eP>5 5'K
real,1 BM
vG w
e,1069,1074
4eRV?tE9
*do,i,1074,1079 oy _DYop
e,i,i+1 2m*g,J?ql
*enddo <27:O,I
e,1080,32 UZV\ ]Y
e,32,63 .:b&$~<
*do,i,63,45 qdOUv f
e,i,i-1 Rs +),
*enddo l B(E:{6OZ
*do,i,1041,1067 F%]Z yO9
e,i,i+1 <73dXTZ0
*enddo <TDp8t9bU
e,1068,1029 C)a;zU;9
e,1069,1073 UqA <rW
*do,i,1073,1071 cm'`u&S
e,i,i-1 }MiEbLduN
*enddo zUIh^hbFf
e,1070,1029 XHh!Q0v;
save [Zpx
:r}
finish R/O>^s!Co
!施加约束 ~0 PR>QJ
/solu !bq3c(d
nsel,s,loc,x,14.8,15 !土体两远端和底端位移为0 p9(|p Z
nsel,a,loc,x,-15,-14.8 Qms ,kX
d,all,ux R ^ln-H;
nsel,s,loc,y,-6,-5.8 sU= 7)*$
d,all,uy DH>>u
gplot ZHN@&Gg6)
acel,0,10,0 !施加重力场 )@V z,f\}
esel,s,type,,1 !杀死梁和桩单元 %3:[0o={d
ekill,all k$ORV U
save m-v0=+~&
nropt,full,, !采用牛顿-拉普森法 *6` };ASK
deltim,100,20,1000 !求解次数 rP7[{'%r
allsel,all BKV,V/*p
outres,all,all }#<mK3MBe
solve !1b4q/
finish nj (\+l5
save 5fT"`FL?
