xc6031272 发表于 2015-11-2 20:31:21

求大神相助!

本人想用flac3d模拟直剪试验,在书上看到一个记录剪力的命令流,看不太懂,希望大神能出手相助!
命令流如下:
def ax_str
        str = 0
        sdis1=0
        n1=0
        i_pnt = i_head
        node_pnt = i_node_head(i_pnt)
loop while node_pnt # null
        n1=n1+1
        str = str + in_sstr(node_pnt,1)*in_area(node_pnt)
        sdis1=sdis1+in_sdisp(node_pnt,1)
        node_pnt = in_next(node_pnt)
endloop
ax_str = str/0.085      
sdis1=sdis1/n1
end
hist ax_strsdis1

xc6031272 发表于 2015-11-4 21:17:33

大神在哪里?求帮助啊

xc6031272 发表于 2015-11-7 09:33:09

果断自顶:)
页: [1]
查看完整版本: 求大神相助!