我这个FLACD 3D小程序哪错了，怎么运行不出来啊 [复制链接]

;利用FISH函数为材料水面的上下部分分别指定干湿密度
def ini_dens        ；定义初始密度函数
    pnt=zone_head
    loop while pnt # null        ；遍历单元
        if z_pp(pnt) # 0.0 then
            z_density(pnt)=1960        ；为水面以下单元指定饱水密度
        else
            z=density(pnt)=1900        ；为水面以下单元指定干密度
        endif
        pnt=z_next(pnt)
    endloop
end

你有没有发现“ z=density(pnt)=1900 " 两个等号了，应该是“ z_density(pnt)=1900”

厉害、厉害，学习了！

liuxur811:你有没有发现“ z=density(pnt)=1900 " 两个等号了，应该是“ z_density(pnt)=1900” (2013-07-11 23:34) 

是我太马虎了，谢啦！

厉害、厉害，学习了！