找回密码
 注册
Simdroid-非首页
查看: 2373|回复: 39

[命令/FISH] 用FISH建立简单边坡模型

[复制链接]
发表于 2006-4-7 15:18:23 | 显示全部楼层 |阅读模式 来自 重庆大学
这是最近我学FISH的一点小心得,送给大家共享!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×

评分

1

查看全部评分

发表于 2006-4-8 12:06:24 | 显示全部楼层 来自 北京

Re:用FISH建立简单边坡模型

Simdroid开发平台
运行出现问题怎么回事?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
发表于 2006-4-8 12:11:36 | 显示全部楼层 来自 北京

Re:用FISH建立简单边坡模型

这个也是运行的错误你自己看看

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
 楼主| 发表于 2006-4-14 08:54:55 | 显示全部楼层 来自 重庆大学

Re:用FISH建立简单边坡模型

本模型适用于FLAC v5.0,我在电脑用过,现附上直接可以CALL的文本文档,关于楼上的错误,可能是由于网格数量过多引起,可以试一下双精度版(意即FLAC_DP.EXE)

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
 楼主| 发表于 2006-4-14 08:57:00 | 显示全部楼层 来自 重庆大学

Re:用FISH建立简单边坡模型

当然,建模的方法有很多,还有其他更好的方法,见附件SLOPE02,可以直接CALL的文本文档,本帖的目的在于解释如何用FISH进行交互式程序设计,献丑了。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
78guai 该用户已被删除
发表于 2006-4-24 16:20:27 | 显示全部楼层 来自 山东青岛
提示: 作者被禁止或删除 内容自动屏蔽
发表于 2006-5-20 10:48:42 | 显示全部楼层 来自 北京
谢谢了,正是我想要的,感激
发表于 2006-5-22 21:19:50 | 显示全部楼层 来自 江苏南京
学习一下!
发表于 2006-8-24 11:36:50 | 显示全部楼层 来自 江苏南京
怎么得到安全系数?
发表于 2006-8-24 11:53:24 | 显示全部楼层 来自 上海
solve fos就可以得到安全系数了
发表于 2006-8-27 12:41:57 | 显示全部楼层 来自 四川成都
def slope_angle ;定义边坡倾角函数
flag=0
loop while flag=0
theta=in('Please input slope angle between 15.0 and 90.0 degree:')
if theta<=15
   flag=0
   wrongmsg=out('Wrong Angle! Please input again!')
else
  if theta>90
   flag=0
   wrongmsg=out('Wrong Angle! Please input again!')
  else
   flag=1
   rightmsg=out('You have input '+string(theta)+' degree!')
   xl=20.0+10.0*tan((90.0-theta)*pi/180.0)
   il=int((40.0+20.0*tan((90.0-theta)*pi/180.0))*10+0.5)/10+1  
  end_if   
end_if
endloop
end
slope_angle
gr 120,40
gen 0,0 0,20 60,20 60,0
m mohr
prop s=0.3e8 b=1e8 d=1500 fri=20 coh=1e10
gen line 20,20 xl,10
mark i=il,121 j=21
plo hold grid mark
copy mark.dxf
fix x i=1 j=1,41
fix x i=121 j=1,41
fix y j=1 i=1,121
plo hold grid fix
copy fix.dxf
set grav=9.81
solve
plo hold sig1 yellow sig2 white bou green
copy ini1.dxf

mod null region=120,40
gen adjust
plo hold grid
copy modnull.dxf

solve
plo hold sig1 yellow sig2 white bou green
copy ini2.dxf
输入坡角后为什么说“丢失参数3”

评分

1

查看全部评分

发表于 2006-8-27 12:42:24 | 显示全部楼层 来自 四川成都
def slope_angle ;定义边坡倾角函数
flag=0
loop while flag=0
theta=in('Please input slope angle between 15.0 and 90.0 degree:')
if theta<=15
   flag=0
   wrongmsg=out('Wrong Angle! Please input again!')
else
  if theta>90
   flag=0
   wrongmsg=out('Wrong Angle! Please input again!')
  else
   flag=1
   rightmsg=out('You have input '+string(theta)+' degree!')
   xl=20.0+10.0*tan((90.0-theta)*pi/180.0)
   il=int((40.0+20.0*tan((90.0-theta)*pi/180.0))*10+0.5)/10+1  
  end_if   
end_if
endloop
end
slope_angle
gr 120,40
gen 0,0 0,20 60,20 60,0
m mohr
prop s=0.3e8 b=1e8 d=1500 fri=20 coh=1e10
gen line 20,20 xl,10
mark i=il,121 j=21
plo hold grid mark
copy mark.dxf
fix x i=1 j=1,41
fix x i=121 j=1,41
fix y j=1 i=1,121
plo hold grid fix
copy fix.dxf
set grav=9.81
solve
plo hold sig1 yellow sig2 white bou green
copy ini1.dxf

mod null region=120,40
gen adjust
plo hold grid
copy modnull.dxf

solve
plo hold sig1 yellow sig2 white bou green
copy ini2.dxf
输入坡角后为什么说“丢失参数3”
发表于 2006-8-29 10:16:24 | 显示全部楼层 来自 贵州毕节
谢谢楼主分享!
发表于 2006-9-10 16:34:44 | 显示全部楼层 来自 广西南宁
支持楼主一下
发表于 2007-5-20 17:20:54 | 显示全部楼层 来自 湖南长沙
顶一下,不是很会
回复 不支持

使用道具 举报

发表于 2007-8-7 17:14:09 | 显示全部楼层 来自 河南郑州
发誓要好好学习
fish
回复 不支持

使用道具 举报

发表于 2008-6-21 11:15:34 | 显示全部楼层 来自 河北石家庄
不知怎么样,先学习一下,谢谢共享。
回复 不支持

使用道具 举报

发表于 2008-6-25 20:36:07 | 显示全部楼层 来自 重庆沙坪坝区
谢谢楼主
回复 不支持

使用道具 举报

发表于 2008-6-25 22:46:53 | 显示全部楼层 来自 四川成都
学习学习
回复 不支持

使用道具 举报

发表于 2008-7-5 16:57:52 | 显示全部楼层 来自 湖北武汉
先学习一下
谢谢
回复 不支持

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Simapps系列直播

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-9-24 18:24 , Processed in 0.062895 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表