FLAC3D 实例命令流1.doc

FLAC3D 实例命令流1.doc

ID:48567894

大小:52.51 KB

页数:7页

时间:2020-01-27

FLAC3D 实例命令流1.doc_第1页
FLAC3D 实例命令流1.doc_第2页
FLAC3D 实例命令流1.doc_第3页
FLAC3D 实例命令流1.doc_第4页
FLAC3D 实例命令流1.doc_第5页
资源描述:

《FLAC3D 实例命令流1.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、第1部分命令流按照顺序进行2-1定义一个FISH函数newdefabcabc=25*3+5Endprintabc2-2使用一个变量newdefabchh=25abc=hh*3+5EndPrinthhPrintabc2-3对变量和函数的理解newdefabchh=25abc=hh*3+5Endsetabc=0hh=0printhhprintabcprinthhnewdefabcabc=hh*3+5endsethh=25printabcsetabc=0hh=0printhhprintabcprinthh2-4获取变量的历史记录newgenzonebricksize121m

2、odelmohrpropshear=1e8bulk=2e8cohes=1e5tens=1e10fixxyzrangey-0.10.1applyyvel-1e-5rangey1.92.1plotsetrotation0045plotblockgroupdefget_adad1=gp_near(0,2,0)ad2=gp_near(1,2,0)ad3=gp_near(0,2,1)ad4=gp_near(1,2,1)endget_addefloadload=gp_yfunbal(ad1)+gp_yfunbal(ad2)+gp_yfunbal(ad3)+gp_yfunbal(a

3、d4)endhistloadhistgpydis0,2,0step1000plothis1vs-22-5用FISH函数计算体积模量和剪砌模量newdefderives_mod=y_mod/(2.0*(1.0+p_ratio))b_mod=y_mod/(3.0*(1.0-2.0*p_ratio))endsety_mod=5e8p_ratio=0.25deriveprintb_modprints_mod2-6在FLAC输入中使用符号变量Newdefderives_mod=y_mod/(2.0*(1.0+p_ratio))b_mod=y_mod/(3.0*(1.0-2.0*

4、p_ratio))endsety_mod=5e8p_ratio=0.25derivegenzonebricksize2,2,2modelelasticpropbulk=b_modshear=s_modprintzonepropbulkprintzonepropshear2-7控制循环Newdefxxxsum=0prod=1loopn(1,10)sum=sum+nprod=prod*nend_loopendxxxprintsum,prodnewgenzonebrickp0(0,0,0)p1(-10,0,0)p2(0,10,0)p3(0,0,-10)modelelaspl

5、otsetrotation0045plotblockgroupdefinstallpnt=zone_headloopwhilepnt#nullz_depth=-z_zcen(pnt)y_mod=y_zero+cc*sqrt(z_depth)z_prop(pnt,’shear’)=y_mod/(2.0*(1.0+p_ratio))z_prop(pnt,’bulk’)=y_mod/(3.0*(1.0-2.0*p_ratio))pnt=zone_next(pnt)end_loopendsetp_ratio=0.25y_zero=1e7cc=1e8install2-8拆分命令

6、行new;exampleofasumofmanythingsdeflong_sumtemp=v1+v2+v3+v4+v5+v6+v7+v8+v9+v10long_sum=temp+v11+v12+v13+v14+v15end2-9变量类型newdefhaveoneaa=2bb=3.4cc=’Haveaniceday’dd=aa*bbee=cc+’,oldchap’endhaveoneprintfish2-10IF条件语句newdefabcifxx>0thenabc=1000elseabc=-1000end_ifendsetxx=10printabcsetxx=0pri

7、ntabc2-11索单元自动生成newgenzonebricksize1035plotsetrotation0045plotblockgroupdefplace_cablesloopn(1,5)z_d=float(n)-0.5commandselcablebeg0.0,1.5,z_dend7.0,1.5,z_dnseg7end_commandend_loopendplace_cablesplotgridselgeomrednewgenzonebricksize1035plotsetrotation15060plotblockgroupmodmohrp

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。