flac3d-三轴模拟命令流

整理文档很辛苦,赏杯茶钱您下走!

免费阅读已结束,点击下载阅读编辑剩下 ...

阅读已结束,您可以下载文档离线阅读编辑

资源描述

nimpgrid1groupsoilrangegrouprocknotplotblockgroup;assignpropertiesmodelmohrproden2200bulk4e7she1.5e7co8e4fric28ten9e3dil10rangegroupsoilproden2900bulk2.5e10she1.2e10co4e6fric45ten2e6dil15rangegrouprock;boundaryconditionsfixxyzrangez-0.10.1fixxyzrangez7.98.1fixyappnstress-1e5rangex-0.10.1appnstress-1e5rangex4.95.1pause;*************inizvel-2.5e-5rangez7.98.1;-*************defaxi_stressf_accum=0.0pnt=gp_headloopwhilepnt#nullifgp_zpos(pnt)0.15thenf_accum=f_accum+gp_zfunbal(pnt)endifpnt=gp_next(pnt)endloopaxi_stress=f_accum/0.5enddeflat_stressg_accum=0.0pnt=gp_headloopwhilepnt#nullifgp_xpos(pnt)0.1theng_accum=g_accum+gp_xfunbal(pnt)endifpnt=gp_next(pnt)endlooplat_stress=g_accum/0.8endhistn1histaxi_stresshistlat_stresshistgpzdis008histgpxdis004histgpxdis054histunbal;**************plothist-1vs-3;axialstressvsaxialdisplace;**************step15000save1.savhistwrite1fileaxi_stress.dathistwrite2filelat_stress.dathistwrite3fileaxi_dis.dathistwrite4filelat_dis1.dathistwrite5filelat_dis2.dathistwrite6fileunbalance.dat

1 / 2
下载文档,编辑使用

©2015-2020 m.777doc.com 三七文档.

备案号:鲁ICP备2024069028号-1 客服联系 QQ:2149211541

×
保存成功