- 1、本文档共6页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
FLAC3D浅基础的稳定性模拟
模拟二维的条形基础在已知材料中的塑性流动,进行应力应变分析。
建模及命令语句如下:
gen zone brick size 20 1 10
;建立矩形的网格区域,其大小为20×1×10
model mohr
;采用摩尔-库仑模型
prop bul 2.e8 shea 1.e8 cohesion 1.e5
;模型的材料性质:体积模量、剪切模量、粘聚力
prop friction 0. dilation 0. tension 1.e10
;内摩擦角0°、剪胀角0°、抗拉强度
fix x range x -.1 .1
;在x方向上固定边界 x =0(即只在x方向上受约束)
fix x y z range z -.1 .1
;在x y z方向上固定边界 z =0(即为固定约束)
fix x y z range x 19.9 20.1
;在x y z方向上固定边界 x =20
fix y
;约束所有y方向上运动
fix x y z range x -.1 3.1 z 9.9 10.1
;在x y z方向上固定平面 x =0,3 z= 10
ini zvel -0.5e-5 range x -.1 3.1 z 9.9 10.1
;在平面 x =0,3 z= 10上初始化z方向的速度
def p_cons
;用 fish 语言定义函数p_cons
pdis1 = gp_near(0.,0.,10.)
;靠近坐标(0,0,10)的节点的地址赋予pdis1
pdis2 = gp_near(0.,1.,10.) ;
;靠近坐标(0,0,10)的节点的地址赋予pdis2
p_sol = (2. + pi)
; 2 π + 赋予 p_sol
end
;用于 fish语言的结尾
p_cons
;运行函数p_cons
; p_load : average footing pressure / c
;场地的平均压力
; c_disp : magnitude of vertical displacement at footing center / a
;场地中心的垂直沉降量
def actLoad
;定义函数 actLoad(活荷载)(fish语言的起始句)
pnt = gp_head
;把网格点指针的首个地址(gp_head)赋予变量 pnt
pload = 0.0
;定义变量 pload为 0
n = 0
;定义变量 n为0
loop while pnt # null
;loop是循环命令,其条件是 0 pnt ≠
if gp_zpos(pnt) 9.9 then
;当变量 pnt所对应 的 z坐标大于 9.9
if gp_xpos(pnt) 3.1 then
;且x 坐标小于3.1 时
pload = pload + gp_zfunbal(pnt)
;变量 pload为上次循环中的值与变量 pnt所对应的 z方向上的不平衡力的和
n = n+ 1
;n自我加 1
endif
;结束里面的 if
endif
; 结束外面的 if
pnt = gp_next(pnt)
; 把网格点指针的下一个地址(gp_next)赋予变量 pnt
endloop
;结束循环
actLoad = pload / (3.5 * z_prop(zone_head,cohesion))
;这里函数actLoad 的值,为后面的式子所赋予,其中pload为循环结束后的最终
;值z_prop(zone_head,cohesion)为首个单元的粘聚力的数值
c_disp = -(gp_zdisp(pdis1) + gp_zdisp(pdis2)) / 7.0
; 同理,这里函数 c_disp的值,也为后面的式子所赋予,其中 gp_zdisp(pdis1)为
;变量pdis1所对应的网格点在 z方向的位移,gp_zdisp(pdis2) 变量pdis2所对应
;的网格点在 z方向的位移
end
; fish语言的结束句
def p_err
;定义函数 p_err
p_err = 100. * (actLoad - p_sol) / p_sol
;函数 p_err的值为后面式子所定义
end
;fish语言的结束句
hist n 50
;对n做历史记录
hist actLoad
;对actLoad 做历史记录
hist p_sol
;对p_sol
文档评论(0)