(1)创建物理环境 6KRC_-
/COM, Structural Tpd|+60g
/TITLE, Slope stability Analysis F+SqJSa
/FILNAM,support,1 4~K%,K+Du
(2)建立模型 LG+2?+tE"
!进入前处理器 0sA+5*mdM
/PREP7 0g`$Dap
!定义单元类型 fpa~~E-
ET,1,PLANE82 !定义边坡围岩单元 :OFs"bC
KEYOPT,1,3,2 !求解类型为平面应变 FTQNS8
!定义材料属性 mz|p=[lR|
!边坡围岩1材料属性 !kS/Ei
MP,EX,1,3E10 k.ttrKy<q/
MP,PRXY,1,0.25 Q@
Ze+IhK`
MP,DENS,1,2500 !定义塑性模型 `oU|U!|
TB,DP,1 !定义数据表1 dLfB){>S
TBDATA,1,9E5,42.8 !给数据表输入数据 0NF=7 j
!边坡围岩2材料属性 !采用弹性模型 VTwDa*]AhB
MP,EX,2,3.2E10 !定义弹性模量 |JLXgwML
MP,PRXY,2,0.24 !定义泊松比 bgYUsc*uR
MP,DENS,2,2700 !定义密度 NXCvS0/h
!取强度折减系数F=1.2时边坡围岩材料属性 %6W%-`
MP,EX,3,3E10 bs&>QsI?j
MP,PRXY,3,0.25 8Drz
i!}
MP,DENS,3,2500 Ii&\LJ
TB,DP,3 !定义数据表3 RG.wu6Av
TBDATA,1,7.5E5,37.7 !给数据表输入数据 ]Zz.n5c
!取强度折减系数F=1.4时边坡围岩材料属性 ;Rljx3!N
MP,EX,4,3E10 {SkE`u4Sz
MP,PRXY,4,0.25 !定义泊松比 x']Fe7nv
MP,DENS,4,2500 0T7t.
TB,DP,4 !定义数据表4 Rc vp@
TBDATA,1,6.4E5,33.5 !给数据表输入数据 )*XD"-9
!取强度折减系数F=1.6时边坡围岩材料属性 ni85Ne$
MP,EX,5,3E10 "WzKJwFr
MP,PRXY,5,0.25 c;Gf$9?iC
MP,DENS,5,2500 !定义密度 c`@";+|r
TB,DP,5 !定义数据表5 al" =ld(
TBDATA,1,5.6E5,30 !给数据表输入数据 f~10 iD
!取强度折减系数F=1.8时边坡围岩材料属性 [jv+Of
IZ
MP,EX,6,3E10 !定义弹性模量 )|=4H>?%
MP,PRXY,6,0.25 I.[Lv7U-
MP,DENS,6,2500 Fs3
:NH
TB,DP,6 !定义数据表6 w>o/)TTJL
TBDATA,1,5.0E5,27.2 G*f\
/
!取强度折减系数F=2.0时边坡围岩材料属性 h343$,))u
MP,EX,7,3E10 2FcNzAaV
MP,PRXY,7,0.25 !定义泊松比 w{*PZb4
MP,DENS,7,2500 `&9iC 4P
TB,DP,7 !定义数据表7 E&N~h|CL
TBDATA,1,4.5E5,24.8 3$_JNF`
!取强度折减系数F=2.2时边坡围岩材料属性 p ,.6sk
MP,EX,8,3E10 N%F4ug@i
MP,PRXY,8,0.25 suS[P?4
MP,DENS,8,2500 2){O&8 A
TB,DP,8 !定义数据表8 ob;O,&e0>
TBDATA,1,4.09E5,22.8 oOHY+'V
!取强度折减系数F=2.4时边坡围岩材料属性 7`f%?xVn0
MP,EX,9,3E10 Q5b9q$L$
MP,PRXY,9,0.25 e%lxRN"b
MP,DENS,9,2500 ;0U*N &
f
TB,DP,9 !定义数据表9 /i~x.i3
TBDATA,1,3.6E5,21.1 !给数据表输入数据 zI0d
!取强度折减系数F=2.6时边坡围岩材料属性 c'>_JlG~
MP,EX,10,3E10 !定义弹性模量 f`)*bx
MP,PRXY,10,0.25 !定义泊松比 BwkY;Ur/AL
MP,DENS,10,2500 !定义密度 Wu" 1M^a
TB,DP,10 !定义数据表10 g4u6#.m(
TBDATA,1,3.46E5,19.6 !给数据表10输入数据 >=4('
!取强度折减系数F=2.8时边坡围岩材料属性 W7. +
MP,EX,11,3E10 !定义弹性模量 la}cGZ; p.
MP,PRXY,11,0.25 !定义泊松比 fy$?~Ji&
MP,DENS,11,2500 ?N(<w?Gat
TB,DP,11 !定义数据表11 G
c\^Kg^#
TBDATA,1,3.2E5,18.2 !给数据表11输入数据 UwxszEHC
!取强度折减系数F=3.0时边坡围岩材料属性 }<YU4EW
MP,EX,12,3E10 !定义弹性模量 P{x6e/
MP,PRXY,12,0.25 d
N$,AO T
MP,DENS,12,2500 !定义密度 !S%0#d2
TB,DP,12 !定义数据表12 W4,'?o
TBDATA,1,3.0E5,17.1 !给数据表12输入数据 ('{aOiSH
!建立几何模型 CBv0fQtL
!创建边坡线模型线 PXyv);#Q`
K,1,,,, ! 创建关键点1 ):[}NDmC
K,2,-800,,, p|(SR~;6
K,3,-800,-800,, _RIlGs\.
K,4,-800,-1200,, i),bAU!+m
K,5,1200,-1200,, ap8q`a{j^
K,6,1200,-800,, 4l7
Ny\J
K,7,1200,,, K iEmvC
K,8,1200,378,, d@p#{ -
K,9,430,378,, Wb>;L@jB7
l,1,2 !连接关键点1、2生成直线L1 1_b*j-j
l,2,3 14"+ctq
l,3,4 +4
h!;i
l,4,5 i)'tt9f$
l,5,6 3vKTCHbk9
l,6,7 IJ~j(.W
l,7,8 8ok=&Gq4
l,8,9 g60k R7;\
l,9,1 l2kGFgc
l,1,7 P@keg*5@
l,3,6 |;7mDhj=
!创建边坡面模型 b8_F2
al,3,4,5,11 !由线L3、L4、L5、L11生成一个面A1 ;*$e8y2
al,1,2,11,6,10 !由线L1、L2、L1、L6、L10生成一个面A2 Jt[,V*:#
al,7,8,9,10 !由线L7、L8、L9、L10生成一个面A3 Y!8FW|
/PNUM, area, on !打开面号开关 yIcTc
!划分网格生成有限元模型 c6lCF &
! 划分边坡围岩2网格 <=V{tl
!设置网格份数 `KN>0R2k
lsel,s,,,3,5,2 !选择线L3和L5 d]Y;rqjue
lesize,all,,,5 !把所选择线分为5段 0-[naGz
lsel,s,,,4,11,7 !选择线L4和L11 Lg~C:BNF
lesize,all,,,26 !把所选择线分为26段 0QT:@v2R
mat,2 !给边坡围岩2赋予2号材料特性 Fuzb4Df
type,1 !采用单元类型1 ALy7D*Z]w
mshkey,0 !设定自由网格划分 /`l;u7RD
mshape,0 !设定四边形网格划分 }W'4(V;:
amesh,1 !划分面积A1 2lO(f+
! 划分边坡围岩1网格 ^86M94k
!设置网格份数 zPc"r$'0U
lsel,s,,,2,6,4 !选择线L2和L6 h=0a9vIXF
lsel,a,,,1 !附加选择线L1 P%)r4+at
lesize,all,,,10 !把所选择线分为10段 Ix6\5}.c 9
lsel,s,,,8,10,2 !选择线L8和L10 cFt&E