Symbol Description Uses
thefield 15


File Line number Procedure Code
./pkg/ctrl/ctrl_getrec.F 103 CTRL_GETREC 
      else if ( thefield .eq. 'xx_atemp'   ) then
./pkg/ctrl/ctrl_getrec.F 111 CTRL_GETREC 
      else if ( thefield .eq. 'xx_sflux'   ) then
./pkg/ctrl/ctrl_getrec.F 119 CTRL_GETREC 
      else if ( thefield .eq. 'xx_aqh'   ) then
./pkg/ctrl/ctrl_getrec.F 127 CTRL_GETREC 
      else if ( thefield .eq. 'xx_tauu'   ) then
./pkg/ctrl/ctrl_getrec.F 135 CTRL_GETREC 
      else if ( thefield .eq. 'xx_uwind'   ) then
./pkg/ctrl/ctrl_getrec.F 143 CTRL_GETREC 
      else if ( thefield .eq. 'xx_tauv'   ) then
./pkg/ctrl/ctrl_getrec.F 151 CTRL_GETREC 
      else if ( thefield .eq. 'xx_vwind'   ) then
./pkg/ctrl/ctrl_getrec.F 159 CTRL_GETREC 
      else if ( thefield .eq. 'xx_obcsn'   ) then
./pkg/ctrl/ctrl_getrec.F 167 CTRL_GETREC 
      else if ( thefield .eq. 'xx_obcss'   ) then
./pkg/ctrl/ctrl_getrec.F 175 CTRL_GETREC 
      else if ( thefield .eq. 'xx_obcsw'   ) then
./pkg/ctrl/ctrl_getrec.F 183 CTRL_GETREC 
      else if ( thefield .eq. 'xx_obcse'   ) then
./pkg/ctrl/ctrl_getrec.F 255 CTRL_GETREC 
     &                                     thefield
./pkg/ctrl/ctrl_getrec.F 55 CTRL_GETREC 
      character*(*) thefield
./pkg/ctrl/ctrl_getrec.F 8 CTRL_GETREC 
     I                        thefield,
./pkg/ctrl/ctrl_getrec.F 95 CTRL_GETREC 
      if ( thefield .eq. 'xx_hflux'   ) then