Symbol Description Uses
f_genarr3d 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1270 ECCO_COST_FINAL
     &     ' --> f_genarr3d =',f_genarr3d(num_var),
./pkg/ecco/ecco_cost_final.F 127 ECCO_COST_FINAL
      _RL f_genarr3d(maxCtrlArr3D)
./pkg/ecco/ecco_cost_final.F 1601 ECCO_COST_FINAL
     &    f_genarr3d(num_var),
./pkg/ecco/ecco_cost_final.F 308 ECCO_COST_FINAL
        f_genarr3d(num_var)= 0. _d 0
./pkg/ecco/ecco_cost_final.F 675 ECCO_COST_FINAL
          f_genarr3d(num_var) = f_genarr3d(num_var)
./pkg/ecco/ecco_cost_final.F 924 ECCO_COST_FINAL
        _GLOBAL_SUM_RL(f_genarr3d(num_var), myThid )