Symbol Description Uses
UWIND 8



File Line number Procedure Code
./pkg/seaice/dynsolver.F 124 DYNSOLVER
          U1=QUART*(UWIND(I-1,J-1,bi,bj)+UWIND(I-1,J,bi,bj)
./pkg/seaice/dynsolver.F 125 DYNSOLVER
     &             +UWIND(I  ,J-1,bi,bj)+UWIND(I  ,J,bi,bj))
./pkg/seaice/seaice_get_dynforcing.F 110 SEAICE_GET_DYNFORCING
          U1=UWIND(i,j,bi,bj)
./pkg/seaice/seaice_get_dynforcing.F 147 SEAICE_GET_DYNFORCING
            U1=UWIND(i,j,bi,bj)
./pkg/seaice/seaice_get_dynforcing.F 169 SEAICE_GET_DYNFORCING
            U1=UWIND(i,j,bi,bj)
./pkg/bulk_force/bulkf_fields_load.F 382 BULKF_FIELDS_LOAD
          UWIND(i,j,bi,bj)   = bWght*uwind0(i,j,bi,bj)