Symbol Description Uses
UWIND 9



File Line number Procedure Code
./pkg/seaice/dynsolver.F 121 DYNSOLVER
          U1=QUART*(UWIND(I-1,J-1,bi,bj)+UWIND(I-1,J,bi,bj)
./pkg/seaice/dynsolver.F 122 DYNSOLVER
     &             +UWIND(I  ,J-1,bi,bj)+UWIND(I  ,J,bi,bj))
./pkg/seaice/seaice_get_dynforcing.F 135 SEAICE_GET_DYNFORCING
            U1=UWIND(i,j,bi,bj)
./pkg/seaice/seaice_get_dynforcing.F 157 SEAICE_GET_DYNFORCING
            U1=UWIND(i,j,bi,bj)
./pkg/seaice/seaice_get_dynforcing.F 98 SEAICE_GET_DYNFORCING
          U1=UWIND(i,j,bi,bj)
./pkg/seaice/seaice_model.F 270 SEAICE_MODEL
        CALL DIAGNOSTICS_FILL(UWIND   ,'SIuwind ',0,1 ,0,1,1,myThid)
./pkg/bulk_force/bulkf_fields_load.F 382 BULKF_FIELDS_LOAD
          UWIND(i,j,bi,bj)   = bWght*uwind0(i,j,bi,bj)