Symbol Description Uses
uwind1 20



File Line number Procedure Code
./pkg/bulk_force/bulkf_fields_load.F 100 BULKF_FIELDS_LOAD
      _RS  uwind1   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/bulk_force/bulkf_fields_load.F 153 BULKF_FIELDS_LOAD
       CALL LEF_ZERO( uwind1,myThid )
./pkg/bulk_force/bulkf_fields_load.F 238 BULKF_FIELDS_LOAD
       CALL READ_REC_XY_RS( UWindFile,uwind1,intime1,
./pkg/bulk_force/bulkf_fields_load.F 333 BULKF_FIELDS_LOAD
       _EXCH_XY_R4(uwind1, myThid )
./pkg/bulk_force/bulkf_fields_load.F 387 BULKF_FIELDS_LOAD
     &                        +aWght*uwind1(i,j,bi,bj)
./pkg/bulk_force/bulkf_fields_load.F 84 BULKF_FIELDS_LOAD
     &                 flw1, uwind1, vwind1, runoff1,
./pkg/exf/exf_init.F 47 EXF_INIT
     &     uwindconst, uwind, uwind0, uwind1, mythid )
./pkg/exf/exf_getffields.F 108 EXF_GETFFIELDS
     &     uwind, uwind0, uwind1, uwindmask,
./pkg/exf/exf_getffields.F 94 EXF_GETFFIELDS
     &     exf_inscal_uwind, uwind, uwind0, uwind1, uwindmask,
./pkg/exf/exf_fields.h 152 NO PROCEDURE
      common /exfl_uwind_r/ uwind0, uwind1
./pkg/exf/exf_fields.h 154 NO PROCEDURE
      _RL uwind1    (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy)
./pkg/seaice/SEAICE_FFIELDS.h 85 NO PROCEDURE
      COMMON /SEAICE_TDFIELDS/ uwind0, uwind1, vwind0, vwind1,
./pkg/seaice/SEAICE_FFIELDS.h 90 NO PROCEDURE
      _RS  uwind1   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./pkg/seaice/seaice_get_forcing.F 142 SEAICE_GET_FORCING
        CALL READ_REC_XY_RS( fName,uwind1,iRec+1,myIter,myThid )
./pkg/seaice/seaice_get_forcing.F 212 SEAICE_GET_FORCING
       CALL EXCH_UV_XY_RS(uwind1, vwind1, .TRUE., myThid)
./pkg/seaice/seaice_get_forcing.F 249 SEAICE_GET_FORCING
         CALL READ_REC_XY_RS( fName,uwind1,iRec,myIter,myThid )
./pkg/seaice/seaice_get_forcing.F 266 SEAICE_GET_FORCING
        CALL EXCH_UV_XY_RS(uwind1, vwind1, .TRUE., myThid)
./pkg/seaice/seaice_get_forcing.F 420 SEAICE_GET_FORCING
     &                        aWghtWind *  uwind1(i,j,bi,bj)
./pkg/seaice/seaice_get_forcing.F 433 SEAICE_GET_FORCING
     &                        bWghtWind *  uwind1(i,j,bi,bj)
./pkg/seaice/seaice_get_forcing.F 99 SEAICE_GET_FORCING
       CALL INIT_ARRAY_RS( uwind1  , initValue, myThid )