Symbol Description Uses
cost_yftype 64


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 100 SEAICE_COST_WEIGHTS 
         IF ( cost_yftype.EQ.'RL' ) THEN
./pkg/ecco/cost_bp_read.F 111 COST_BP_READ 
        call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_ctdsclim.F 167 COST_CTDSCLIM 
        call MDSREADFIELD( ctdsclimfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_ctdtclim.F 166 COST_CTDTCLIM 
        call MDSREADFIELD( ctdtclimfile, cost_iprec, cost_yftype,
./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/ecco_cost.h 366 NO PROCEDURE 
     &                        cost_yftype
./pkg/ecco/ecco_cost.h 369 NO PROCEDURE 
      character*(2) cost_yftype
./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 458 ECCO_READPARMS 
        cost_yftype = 'RL'
./pkg/ecco/ecco_readparms.F 482 ECCO_READPARMS 
        IF ( cost_yftype.NE.'RL' ) THEN