Symbol Description Uses
cost_iprec 70



File Line number Procedure Code
./pkg/seaice/seaice_cost_concentration.F 237 SEAICE_COST_CONCENTRATION
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./pkg/seaice/seaice_cost_sss.F 255 SEAICE_COST_SSS
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./pkg/seaice/seaice_cost_sst.F 255 SEAICE_COST_SST
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./pkg/seaice/seaice_cost_weights.F 101 SEAICE_COST_WEIGHTS
           CALL READ_REC_3D_RL( smrarea_errfile, cost_iprec, nnz,
./pkg/ecco/cost_argo_salt.F 143 COST_ARGO_SALT
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, argosobs,
./pkg/ecco/cost_argo_theta.F 146 COST_ARGO_THETA
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, argotobs,
./pkg/ecco/cost_bp_read.F 111 COST_BP_READ
        call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_ctds.F 142 COST_CTDS
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, ctdsobs,
./pkg/ecco/cost_ctdsclim.F 167 COST_CTDSCLIM
        call MDSREADFIELD( ctdsclimfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_ctdt.F 143 COST_CTDT
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, ctdtobs,
./pkg/ecco/cost_ctdtclim.F 166 COST_CTDTCLIM
        call MDSREADFIELD( ctdtclimfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_curmtr.F 149 COST_CURMTR
        call MDSREADFIELD( curmtrufile,cost_iprec, 'RL', nr, curmtruobs,
./pkg/ecco/cost_curmtr.F 152 COST_CURMTR
        call MDSREADFIELD( curmtrvfile,cost_iprec, 'RL', nr, curmtrvobs,
./pkg/ecco/cost_gencost_boxmean.F 112 COST_GENCOST_BOXMEAN
     &                     cost_iprec, cost_yftype,
./pkg/ecco/cost_gencost_boxmean.F 141 COST_GENCOST_BOXMEAN
     &                     cost_iprec, cost_yftype,
./pkg/ecco/cost_gencost_seaicev4.F 311 COST_GENCOST_SEAICEV4
          call MDSREADFIELD( fname0, cost_iprec, cost_yftype, nnzobs,
./pkg/ecco/cost_gencost_seaicev4.F 343 COST_GENCOST_SEAICEV4
          call MDSREADFIELD( fname0w, cost_iprec, cost_yftype, nnzobs,
./pkg/ecco/cost_gencost_sstv4.F 219 COST_GENCOST_SSTV4
               call MDSREADFIELD( fname2, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_gencost_sstv4.F 371 COST_GENCOST_SSTV4
               call MDSREADFIELD( fname2, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_generic.F 247 COST_GENERIC
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./pkg/ecco/cost_ies_read.F 100 COST_IES_READ
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_readargos.F 84 COST_READARGOS
      call MDSREADFIELD( argosfile, cost_iprec, cost_yftype, nr,
./pkg/ecco/cost_readargot.F 84 COST_READARGOT
      call MDSREADFIELD( argotfile, cost_iprec, cost_yftype, nr,
./pkg/ecco/cost_readers.F 127 COST_READERS
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, ersobs,
./pkg/ecco/cost_readgfo.F 127 COST_READGFO
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, gfoobs,
./pkg/ecco/cost_readscatxfields.F 166 COST_READSCATXFIELDS
             call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_readscatyfields.F 165 COST_READSCATYFIELDS
             call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_readtopex.F 154 COST_READTOPEX
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, tpobs,
./pkg/ecco/cost_readtopexmean.F 70 COST_READTOPEXMEAN
      call MDSREADFIELD( mdtdatfile, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_salt.F 167 COST_SALT
        call MDSREADFIELD( sdatfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_sigmar.F 160 COST_SIGMAR
        call MDSREADFIELD( sigmaRdatfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_sla_read.F 122 COST_SLA_READ
       call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype,
./pkg/ecco/cost_sla_read_yd.F 112 COST_SLA_READ_YD
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, sla_obs,
./pkg/ecco/cost_theta.F 167 COST_THETA
        call MDSREADFIELD( tdatfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_xbt.F 148 COST_XBT
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, xbtobs,
./pkg/ecco/ecco_cost.h 365 NO PROCEDURE
     &                        cost_iprec,
./pkg/ecco/ecco_cost.h 368 NO PROCEDURE
      integer cost_iprec
./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 1038 ECCO_COST_WEIGHTS
         call MDSREADFIELD( vwind_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1070 ECCO_COST_WEIGHTS
         call MDSREADFIELD( hflux_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1105 ECCO_COST_WEIGHTS
         call MDSREADFIELD( atemp_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1139 ECCO_COST_WEIGHTS
         call MDSREADFIELD( sflux_errfile, cost_iprec, cost_yftype,
./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 1206 ECCO_COST_WEIGHTS
        call MDSREADFIELD( precip_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1238 ECCO_COST_WEIGHTS
        call MDSREADFIELD( swflux_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1270 ECCO_COST_WEIGHTS
        call MDSREADFIELD( swdown_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1302 ECCO_COST_WEIGHTS
        call MDSREADFIELD( lwflux_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1334 ECCO_COST_WEIGHTS
        call MDSREADFIELD( lwdown_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1366 ECCO_COST_WEIGHTS
        call MDSREADFIELD( snowprecip_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1399 ECCO_COST_WEIGHTS
        call MDSREADFIELD( evap_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1431 ECCO_COST_WEIGHTS
        call MDSREADFIELD( apressure_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1464 ECCO_COST_WEIGHTS
        call MDSREADFIELD( runoff_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1489 ECCO_COST_WEIGHTS
        call MDSREADFIELD( bottomdrag_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1511 ECCO_COST_WEIGHTS
        call MDSREADFIELD( diffkr_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1535 ECCO_COST_WEIGHTS
        call MDSREADFIELD( kapgm_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1559 ECCO_COST_WEIGHTS
        call MDSREADFIELD( kapredi_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1583 ECCO_COST_WEIGHTS
        call MDSREADFIELD( edtau_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1611 ECCO_COST_WEIGHTS
        call MDSREADFIELD( gencost_errfile(k), cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1615 ECCO_COST_WEIGHTS
        call MDSREADFIELD( gencost_errfile(k), cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 618 ECCO_COST_WEIGHTS
      call MDSREADFIELD( geoid_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 656 ECCO_COST_WEIGHTS
         call MDSREADFIELD( ssh_errfile, cost_iprec, cost_yftype,
./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 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 930 ECCO_COST_WEIGHTS
         call MDSREADFIELD( tauu_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 968 ECCO_COST_WEIGHTS
         call MDSREADFIELD( uwind_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_readparms.F 148 ECCO_READPARMS
     &                   cost_iprec, cost_yftype
./pkg/ecco/ecco_readparms.F 457 ECCO_READPARMS
        cost_iprec  = precFloat32