24小时热门版块排行榜    

CyRhmU.jpeg
查看: 2063  |  回复: 1

liux578

金虫 (正式写手)

[求助] 请问怎样在flac3d中显示超孔隙水压力已有1人参与

请问怎样在flac3d中显示超孔隙水压力
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xie_liang

新虫 (初入文坛)

【答案】应助回帖

应该是用Fish语言编写的额外的调用函数,我也在做这方面的工作,堤坝的地震液化分析,这是fish语言编号的代码:
config zextra 20
def get_old_stress
   p_z=zone_head
   loop while p_z#null
      z_extra(p_z,5)=z_pp(p_z)
      p_z=z_next(p_z)
   endloop
end
get_old_stress
def get_ppr
   whilestepping
   p_z=zone_head
   loop while p_z#null
      z_extra(p_z,7)= z_szz(p_z)+z_pp(p_z)
      z_extra(p_z,4)=z_szz(p_z)
      z_extra(p_z,6)=z_pp(p_z)-z_extra(p_z,5)
      z_extra(p_z,9)=z_szz(p_z)
      z_extra(p_z,2)=(-z_extra(p_z,6)/(z_extra(p_z,4)+z_extra(p_z,5))
      z_extra(p_z,3)=1.0-z_extra(p_z,7)/(z_extra(p_z,4)+z_extra(p_z,5)
      p_z=z_next(p_z)
   endloop
end
get_ppr
这个也是陈育民老师书中的,但是我在调用的时候总出错,我在找原因,看到你问就顺便告诉你,如果你知道原因还请回复我,谢谢
2楼2017-12-06 11:13:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 liux578 的主题更新
信息提示
请填处理意见