Symbol Description Uses
nnz 58


File Line number Procedure Code
./pkg/seaice/seaice_cost_weights.F 101 SEAICE_COST_WEIGHTS 
           CALL READ_REC_3D_RL( smrarea_errfile, cost_iprec, nnz,
./pkg/seaice/seaice_cost_weights.F 48 SEAICE_COST_WEIGHTS 
      integer irec,nnz
./pkg/seaice/seaice_cost_weights.F 96 SEAICE_COST_WEIGHTS 
      nnz   = 1
./pkg/ecco/cost_averagesgeneric.F 104 COST_AVERAGESGENERIC 
            do k = 1,nnz
./pkg/ecco/cost_averagesgeneric.F 10 COST_AVERAGESGENERIC 
     &     sum1loc, locrec, nnz, mythid )
./pkg/ecco/cost_averagesgeneric.F 121 COST_AVERAGESGENERIC 
        if ( nnz .EQ. 1 ) then
./pkg/ecco/cost_averagesgeneric.F 135 COST_AVERAGESGENERIC 
              do k = 1,nnz
./pkg/ecco/cost_averagesgeneric.F 41 COST_AVERAGESGENERIC 
      integer nnz
./pkg/ecco/cost_averagesgeneric.F 45 COST_AVERAGESGENERIC 
      _RL localbar(1-olx:snx+olx,1-oly:sny+oly,nnz,nsx,nsy)
./pkg/ecco/cost_averagesgeneric.F 46 COST_AVERAGESGENERIC 
      _RL localfld(1-olx:snx+olx,1-oly:sny+oly,nnz,nsx,nsy)
./pkg/ecco/cost_averagesgeneric.F 91 COST_AVERAGESGENERIC 
            do k = 1,nnz
./pkg/ecco/ecco_cost_weights.F 1000 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( tauv_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 1031 ECCO_COST_WEIGHTS 
      nnz   =   1
./pkg/ecco/ecco_cost_weights.F 1039 ECCO_COST_WEIGHTS 
     &      nnz, wvwind, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1062 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1071 ECCO_COST_WEIGHTS 
     &      nnz, whflux, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1097 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1106 ECCO_COST_WEIGHTS 
     &      nnz, watemp, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1131 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1140 ECCO_COST_WEIGHTS 
     &      nnz, wsflux, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1166 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1174 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( aqh_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 1198 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1207 ECCO_COST_WEIGHTS 
     &      nnz, wprecip, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1230 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1239 ECCO_COST_WEIGHTS 
     &      nnz, wswflux, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1262 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1271 ECCO_COST_WEIGHTS 
     &      nnz, wswdown, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1294 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1303 ECCO_COST_WEIGHTS 
     &      nnz, wlwflux, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1326 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1335 ECCO_COST_WEIGHTS 
     &      nnz, wlwdown, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1358 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1367 ECCO_COST_WEIGHTS 
     &      nnz, wsnowprecip, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1391 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1400 ECCO_COST_WEIGHTS 
     &      nnz, wevap, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1423 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1432 ECCO_COST_WEIGHTS 
     &      nnz, wapressure, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1456 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 1465 ECCO_COST_WEIGHTS 
     &      nnz, wrunoff, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 1490 ECCO_COST_WEIGHTS 
     &      nnz, wbottomdrag, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 56 ECCO_COST_WEIGHTS 
      integer irec,nnz
./pkg/ecco/ecco_cost_weights.F 616 ECCO_COST_WEIGHTS 
      nnz   =  1
./pkg/ecco/ecco_cost_weights.F 619 ECCO_COST_WEIGHTS 
     &    nnz, wp, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 653 ECCO_COST_WEIGHTS 
      nnz   =   1
./pkg/ecco/ecco_cost_weights.F 657 ECCO_COST_WEIGHTS 
     &      nnz, wtp, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 685 ECCO_COST_WEIGHTS 
     &     call MDSREADFIELD( tp_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 690 ECCO_COST_WEIGHTS 
     &     call MDSREADFIELD( ers_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 695 ECCO_COST_WEIGHTS 
     &     call MDSREADFIELD( gfo_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 856 ECCO_COST_WEIGHTS 
      nnz   =   1
./pkg/ecco/ecco_cost_weights.F 858 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scatx_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 860 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scaty_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 893 ECCO_COST_WEIGHTS 
      nnz   =   1
./pkg/ecco/ecco_cost_weights.F 924 ECCO_COST_WEIGHTS 
      nnz   =   1
./pkg/ecco/ecco_cost_weights.F 931 ECCO_COST_WEIGHTS 
     &      nnz, wtauu, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 962 ECCO_COST_WEIGHTS 
      nnz   =   1
./pkg/ecco/ecco_cost_weights.F 969 ECCO_COST_WEIGHTS 
     &      nnz, wuwind, irec, mythid )
./pkg/ecco/ecco_cost_weights.F 993 ECCO_COST_WEIGHTS 
      nnz   =   1