Symbol Description Uses
thefield 26


File Line number Procedure Code
./pkg/ctrl/ctrl_getrec.F 106 CTRL_GETREC 
      if ( thefield .eq. 'xx_obcsn'   ) then
./pkg/ctrl/ctrl_getrec.F 115 CTRL_GETREC 
      else if ( thefield .eq. 'xx_obcss'   ) then
./pkg/ctrl/ctrl_getrec.F 124 CTRL_GETREC 
      else if ( thefield .eq. 'xx_obcsw'   ) then
./pkg/ctrl/ctrl_getrec.F 133 CTRL_GETREC 
      else if ( thefield .eq. 'xx_obcse'   ) then
./pkg/ctrl/ctrl_getrec.F 143 CTRL_GETREC 
      else if ( thefield .eq. 'xx_hflux'   ) then
./pkg/ctrl/ctrl_getrec.F 152 CTRL_GETREC 
      else if ( thefield .eq. 'xx_atemp'   ) then
./pkg/ctrl/ctrl_getrec.F 161 CTRL_GETREC 
      else if ( thefield .eq. 'xx_sflux'   ) then
./pkg/ctrl/ctrl_getrec.F 170 CTRL_GETREC 
      else if ( thefield .eq. 'xx_aqh'   ) then
./pkg/ctrl/ctrl_getrec.F 179 CTRL_GETREC 
      else if ( thefield .eq. 'xx_precip'   ) then
./pkg/ctrl/ctrl_getrec.F 188 CTRL_GETREC 
      else if ( thefield .eq. 'xx_swflux'   ) then
./pkg/ctrl/ctrl_getrec.F 197 CTRL_GETREC 
      else if ( thefield .eq. 'xx_swdown'   ) then
./pkg/ctrl/ctrl_getrec.F 206 CTRL_GETREC 
      else if ( thefield .eq. 'xx_lwflux'   ) then
./pkg/ctrl/ctrl_getrec.F 215 CTRL_GETREC 
      else if ( thefield .eq. 'xx_lwdown'   ) then
./pkg/ctrl/ctrl_getrec.F 224 CTRL_GETREC 
      else if ( thefield .eq. 'xx_evap'   ) then
./pkg/ctrl/ctrl_getrec.F 233 CTRL_GETREC 
      else if ( thefield .eq. 'xx_snowprecip'   ) then
./pkg/ctrl/ctrl_getrec.F 242 CTRL_GETREC 
      else if ( thefield .eq. 'xx_apressure'   ) then
./pkg/ctrl/ctrl_getrec.F 251 CTRL_GETREC 
      else if ( thefield .eq. 'xx_runoff'   ) then
./pkg/ctrl/ctrl_getrec.F 260 CTRL_GETREC 
      else if ( thefield .eq. 'xx_tauu'   ) then
./pkg/ctrl/ctrl_getrec.F 269 CTRL_GETREC 
      else if ( thefield .eq. 'xx_uwind'   ) then
./pkg/ctrl/ctrl_getrec.F 278 CTRL_GETREC 
      else if ( thefield .eq. 'xx_tauv'   ) then
./pkg/ctrl/ctrl_getrec.F 287 CTRL_GETREC 
      else if ( thefield .eq. 'xx_vwind'   ) then
./pkg/ctrl/ctrl_getrec.F 296 CTRL_GETREC 
      else if ( thefield .eq. 'xx_sst'   ) then
./pkg/ctrl/ctrl_getrec.F 305 CTRL_GETREC 
      else if ( thefield .eq. 'xx_sss'   ) then
./pkg/ctrl/ctrl_getrec.F 378 CTRL_GETREC 
     &                                     thefield
./pkg/ctrl/ctrl_getrec.F 54 CTRL_GETREC 
      character*(*) thefield
./pkg/ctrl/ctrl_getrec.F 7 CTRL_GETREC 
     I                        thefield,