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

[计算分析] 煤矿采空区处理讨论

[复制链接]
发表于 2012-7-21 09:20:38 | 显示全部楼层 |阅读模式 来自 安徽淮南
最近模拟采场开挖遇到一段命令哪位高手帮忙解释一下这些采空区模拟命令式什么意思?
def find_add1
    head1 = null;                       
      p_gp1 = zone_head;           
        loop while p_gp1 # null;     
               if z_group(p_gp1)='3' then
        new1 = get_mem(2);         
         mem(new1) = head1;        
         mem(new1+1) = p_gp1;   
           head1 = new1;                 
          endif
          p_gp1 =z_next(p_gp1);           
      endloop
   end
find_add1
def Modulus1
command
m null range gr 1
so
m null range gr 2
m e
prop bulk 7e6 sh 5.25e6
  endcommand
end
Modulus1
def ww
array arr1(6)
ad=head1
loop while ad # null
p_gp1 = mem(ad+1)
oo = z_fsi(p_gp1,arr1)
strainZ = -arr1(3)
denom = 0.5 - strainZ; bb
clos=strainZ/ 0.5
modulus = 0.5 * 3.5e6 / (denom*denom) ; slope 0.5
z_prop(p_gp1,'bulk') = modulus
z_prop(p_gp1,'shear') = modulus 0.75
z_szz(p_gp1) = -aa * (1.0/denom) * strainZ ; actual value
ad = mem(ad)
endloop
end
def S_tepping1
command
ww
step 100; [changeable]
endcommand
end
def D_uring1
ggg=1
loop while ggg=1
S_tepping1
if mech_ratio<1e-5 then;10e-3 then;
ggg=0
end_if
endloop
end
D_uring1   
发表于 2012-7-31 16:09:01 | 显示全部楼层 来自 安徽
Simdroid开发平台
command  
m null range gr 1
so
m null range gr 2
里面的so什么意思?
回复 不支持

使用道具 举报

发表于 2012-8-22 11:14:04 | 显示全部楼层 来自 北京
应该是solve
回复 不支持

使用道具 举报

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

本版积分规则

Simapps系列直播

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

GMT+8, 2024-9-24 12:21 , Processed in 0.027207 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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