Symbol Description Uses
no_genarr3d 8



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1030 ECCO_COST_FINAL
        _GLOBAL_SUM_RL(no_genarr3d(num_var), myThid )
./pkg/ecco/ecco_cost_final.F 1268 ECCO_COST_FINAL
        if (no_genarr3d(num_var).GT.0. _d 0) then
./pkg/ecco/ecco_cost_final.F 1595 ECCO_COST_FINAL
        if (no_genarr3d(num_var).GT.0. _d 0) then
./pkg/ecco/ecco_cost_final.F 1602 ECCO_COST_FINAL
     &    no_genarr3d(num_var)
./pkg/ecco/ecco_cost_final.F 168 ECCO_COST_FINAL
      _RL no_genarr3d(maxCtrlArr3D)
./pkg/ecco/ecco_cost_final.F 415 ECCO_COST_FINAL
        no_genarr3d(num_var)= 0. _d 0
./pkg/ecco/ecco_cost_final.F 788 ECCO_COST_FINAL
          no_genarr3d(num_var) = no_genarr3d(num_var)