【已悬赏，该帖已无效】弹性应变能密度问题
本帖最后由 alonelyboat 于 2009-8-10 16:45 编辑请问哪位仁兄用FLAC3D做过有关弹性应变能密度问题，望指教，不胜感激！（最好是能贴出命令流）
这是我根据弹性应变能密度公式编写的命令流，能运行但最终无法显示出云图，望论坛里的高手指教。
def energy1
array energys(10,10,10)
loop i (1,10)
loop j (1,10)
loop k (1,10)
s1=sxx(i,,j,k)*sxx(i,,j,k)
s2=syy(i,,j,k)*syy(i,,j,k)
s3=szz(i,,j,k)*szz(i,,j,k)
s4=2*0.25*(sxx(i,,j,k)*syy(i,,j,k)+syy(i,,j,k)*szz(i,,j,k)+sxx(i,,j,k)*szz(i,,j,k));假定泊松比为0.25
energys(i,,j,k)=(s1+s2+s3-s4)/(2*1e6);二维弹性能计算公式,假定弹性模量为1e6
energy3=energys(i,,j,k)
printout
end_loop
end_loop
end_loop
end
energy3 高手呢？怎么都不见了，紧急求救啊！
页:
[1]