Symbol Description Uses
MDSREADFIELD 112


File Line number Procedure Code
./pkg/mdsio/mdsio_rw_field.F 17 MDSREADFIELD 
      SUBROUTINE MDSREADFIELD(
./pkg/seaice/seaice_cost_concentration.F 236 SEAICE_COST_CONCENTRATION 
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./pkg/seaice/seaice_cost_sss.F 254 SEAICE_COST_SSS 
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./pkg/seaice/seaice_cost_sst.F 249 SEAICE_COST_SST 
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./pkg/smooth/smooth_hetero2d.F 41 SMOOTH_HETERO2D 
      call MDSREADFIELD( dist_file,
./verification/global1x1_tot/code/ecco_cost_weights.F 316 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( salt0errfile, 32, 'RL', Nr,
./verification/global1x1_tot/code/ecco_cost_weights.F 355 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( temp0errfile, 32, 'RL', Nr,
./verification/global1x1_tot/code/ecco_cost_weights.F 397 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( salterrfile, 32, 'RL', Nr, wsalt2, 1,
./verification/global1x1_tot/code/ecco_cost_weights.F 441 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( temperrfile, 32, 'RL', Nr, wtheta2, 1,
./verification/global1x1_tot/code/ecco_cost_weights.F 505 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( geoid_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 555 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( ssh_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 613 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scatx_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 615 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scaty_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 703 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( tauu_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 746 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( uwind_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 778 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( tauv_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 821 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( vwind_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 853 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( hflux_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 889 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( atemp_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 921 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( sflux_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code/ecco_cost_weights.F 957 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( aqh_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 314 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( salt0errfile, 32, 'RL', Nr,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 353 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( temp0errfile, 32, 'RL', Nr,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 395 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( salterrfile, 32, 'RL', Nr, wsalt2, 1,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 439 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( temperrfile, 32, 'RL', Nr, wtheta2, 1,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 503 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( geoid_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 553 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( ssh_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 609 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scatx_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 611 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scaty_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 699 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( tauu_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 742 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( uwind_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 774 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( tauv_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 817 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( vwind_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 849 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( hflux_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 885 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( atemp_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 917 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( sflux_errfile, cost_iprec, cost_yftype, nnz,
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 953 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( aqh_errfile, cost_iprec, cost_yftype, nnz,
./pkg/autodiff/active_file_control.F 134 ACTIVE_READ_RL 
        call MDSREADFIELD(
./pkg/autodiff/active_file_control.F 185 ACTIVE_READ_RL 
           call MDSREADFIELD(
./pkg/autodiff/active_file_control.F 247 ACTIVE_READ_RL 
        call MDSREADFIELD(
./pkg/autodiff/active_file_control.F 371 ACTIVE_WRITE_RL 
        call MDSREADFIELD(
./pkg/autodiff/active_file_control.F 592 ACTIVE_READ_TILE_RL 
          call MDSREADFIELD( active_var_file, prec, 'RL',
./pkg/autodiff/active_file_control.F 727 ACTIVE_READ_TILE_RL 
          call MDSREADFIELD( active_var_file, prec, 'RL',
./pkg/ctrl/ctrl_map_ini_gen.F 101 CTRL_MAP_INI_GEN3D 
      call MDSREADFIELD(wFileCur,32,'RL',nR,wFld3d,1,mythid)
./pkg/ctrl/ctrl_map_ini_gen.F 273 CTRL_MAP_INI_GEN2D 
      call MDSREADFIELD(wFileCur,32,'RL',1,wFld2d,1,mythid)
./pkg/ecco/cost_argo_salt.F 142 COST_ARGO_SALT 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, argosobs,
./pkg/ecco/cost_argo_theta.F 145 COST_ARGO_THETA 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, argotobs,
./pkg/ecco/cost_bp_read.F 100 COST_BP_READ 
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_ctds.F 141 COST_CTDS 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, ctdsobs,
./pkg/ecco/cost_ctdsclim.F 166 COST_CTDSCLIM 
        call MDSREADFIELD( ctdsclimfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_ctdt.F 142 COST_CTDT 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, ctdtobs,
./pkg/ecco/cost_ctdtclim.F 165 COST_CTDTCLIM 
        call MDSREADFIELD( ctdtclimfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_curmtr.F 148 COST_CURMTR 
        call MDSREADFIELD( curmtrufile,cost_iprec, 'RL', nr, curmtruobs,
./pkg/ecco/cost_curmtr.F 151 COST_CURMTR 
        call MDSREADFIELD( curmtrvfile,cost_iprec, 'RL', nr, curmtrvobs,
./pkg/ecco/cost_drifter.F 177 COST_DRIFTER 
         call MDSREADFIELD( udriftfile, 32, 'RL', 1, udriftdat, 1,
./pkg/ecco/cost_drifter.F 179 COST_DRIFTER 
         call MDSREADFIELD( vdriftfile, 32, 'RL', 1, vdriftdat, 1,
./pkg/ecco/cost_drifter.F 182 COST_DRIFTER 
         call MDSREADFIELD( udrifterrfile, 32, 'RL', 1, wudrift, 1,
./pkg/ecco/cost_drifter.F 184 COST_DRIFTER 
         call MDSREADFIELD( vdrifterrfile, 32, 'RL', 1, wvdrift, 1,
./pkg/ecco/cost_gencost_sstv4.F 191 COST_GENCOST_SSTV4 
               call MDSREADFIELD( fname2, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_gencost_sstv4.F 329 COST_GENCOST_SSTV4 
               call MDSREADFIELD( fname2, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_generic.F 240 COST_GENERIC 
          call MDSREADFIELD( fname2, cost_iprec, cost_yftype, nnzobs,
./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 122 COST_READERS 
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, ersobs,
./pkg/ecco/cost_readgfo.F 122 COST_READGFO 
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, gfoobs,
./pkg/ecco/cost_readscatxfields.F 116 COST_READSCATXFIELDS 
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_readscatyfields.F 115 COST_READSCATYFIELDS 
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_readtopex.F 121 COST_READTOPEX 
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, tpobs,
./pkg/ecco/cost_readtopexmean.F 70 COST_READTOPEXMEAN 
      call MDSREADFIELD( topexmeanfile, cost_iprec, cost_yftype, 1,
./pkg/ecco/cost_salt.F 166 COST_SALT 
        call MDSREADFIELD( sdatfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_sla_read.F 127 COST_SLA_READ 
      call MDSREADFIELD( fnametmp, cost_iprec, cost_yftype, 1, sla_obs,
./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 165 COST_THETA 
        call MDSREADFIELD( tdatfile, cost_iprec, cost_yftype,
./pkg/ecco/cost_xbt.F 147 COST_XBT 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, xbtobs,
./pkg/ecco/ecco_cost_weights.F 1018 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( hflux_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1053 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( atemp_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1087 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( sflux_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1122 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( aqh_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 1154 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( precip_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1186 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( swflux_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1218 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( swdown_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1250 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( lwflux_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1282 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( lwdown_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1314 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( snowprecip_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1347 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( evap_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1379 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( apressure_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1412 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( runoff_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1437 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( bottomdrag_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1459 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( diffkr_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1483 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( kapgm_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1507 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( kapredi_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1531 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( edtau_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1557 ECCO_COST_WEIGHTS 
        call MDSREADFIELD( gencost_errfile(k), cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 342 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( salt0errfile, 32, 'RL', Nr,
./pkg/ecco/ecco_cost_weights.F 383 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( temp0errfile, 32, 'RL', Nr,
./pkg/ecco/ecco_cost_weights.F 428 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( salterrfile, 32, 'RL', Nr, wsalt2, 1,
./pkg/ecco/ecco_cost_weights.F 476 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( temperrfile, 32, 'RL', Nr, wtheta2, 1,
./pkg/ecco/ecco_cost_weights.F 519 ECCO_COST_WEIGHTS 
     &   call MDSREADFIELD( ssterrfile, 32, 'RL', 1, wsst, 1,
./pkg/ecco/ecco_cost_weights.F 524 ECCO_COST_WEIGHTS 
     &   call MDSREADFIELD( ssserrfile, 32, 'RL', 1, wsss, 1,
./pkg/ecco/ecco_cost_weights.F 591 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( geoid_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 628 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( ssh_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 657 ECCO_COST_WEIGHTS 
     &     call MDSREADFIELD( tp_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 662 ECCO_COST_WEIGHTS 
     &     call MDSREADFIELD( ers_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 667 ECCO_COST_WEIGHTS 
     &     call MDSREADFIELD( gfo_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 734 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( sshv4cost_errfile(num_var),
./pkg/ecco/ecco_cost_weights.F 782 ECCO_COST_WEIGHTS 
     &   call MDSREADFIELD( bperrfile, 32, 'RL', 1, wbp, 1,
./pkg/ecco/ecco_cost_weights.F 805 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scatx_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 807 ECCO_COST_WEIGHTS 
      call MDSREADFIELD( scaty_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 876 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( tauu_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 915 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( uwind_errfile, cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 947 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( tauv_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 986 ECCO_COST_WEIGHTS 
         call MDSREADFIELD( vwind_errfile, cost_iprec, cost_yftype,