如何删除指定id的一系列zone

秉烛游

如题：
new
gen zone bri p0(-5 0 -15) p1(5 0 -15) p2(-5 1 -15) p3(-5 0 0) size 100 1 100
plo blo mo
def del_yy
p_z=zone_head
loop while p_z # null
  x=z_xcen(p_z)
  z=z_zcen(p_z)
  k=4/25*x^2-4
  if z>k
   tt=z_id(p_z)
                        command                             
                             del range id tt
                        endcommand   
  endif
        p_z=z_next(p_z)
endloop
end
del_yy
save 1.sav
上面是一个小算例，在计算中出现问题。提示：unknown fatal exception。我的理解是，p_z这个地址已经被删除了所以后面形成不了循环就删除不了zone。请问有什么好一点的方法吗？谢谢，急！

yangxing

del zone range id tt ？？？

秉烛游

yangxing 发表于 2012-3-8 14:28
del zone range id tt ？？？

哦，多写了一个zone。谢谢。