求浸润线例子

gydbh

def draw
pnt=gp_head
loop while pnt#null
if gp_pp(pnt)#0 then
   px=gp_xpos(p_gp)
   py=gp_ypos(p_gp)
   pz=gp_zpos(p_gp)
  command
   table 1 px py pz
  end command
end_if
pnt=gp_next(pnt)
end_loop
end
draw
陈老师编的《FLAC3D基础与工程实例》第12章里面，求出了大坝的渗流场之后，我想求出浸润线的位置坐标，写了上面的命令流。但是没反应。请各位不吝赐教。有在做FLAC渗流分析的同学加我QQ：418001711。大家互相学习