- 积分
- 0
- 注册时间
- 2008-1-4
- 仿真币
-
- 最后登录
- 1970-1-1
|
悬赏5仿真币未解决
请问哪位仁兄用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 |
|