Symbol Description Uses
objf_gen 8


File Line number Procedure Code
./pkg/ctrl/ctrl_cost_gen.F 416 CTRL_COST_GEN3D 
     O                       objf_gen,
./pkg/ctrl/ctrl_cost_gen.F 449 CTRL_COST_GEN3D 
      _RL objf_gen(nsx,nsy)
./pkg/ctrl/ctrl_cost_gen.F 503 CTRL_COST_GEN3D 
          objf_gen(bi,bj) = 0. _d 0
./pkg/ctrl/ctrl_cost_gen.F 522 CTRL_COST_GEN3D 
            objf_gen(bi,bj) = 0. _d 0
./pkg/ctrl/ctrl_cost_gen.F 530 CTRL_COST_GEN3D 
                  objf_gen(bi,bj) = objf_gen(bi,bj)
./pkg/ctrl/ctrl_cost_gen.F 534 CTRL_COST_GEN3D 
                  objf_gen(bi,bj) = objf_gen(bi,bj) + tmpx*tmpx