Symbol Description Uses
wsm 29


File Line number Procedure Code
./pkg/exf/exf_bulkformulae.F 183 EXF_BULKFORMULAE 
      _RL wsm                   ! limited wind speed [m/s] (> umin)
./pkg/exf/exf_bulkformulae.F 321 EXF_BULKFORMULAE 
            wsm        = sh(i,j,bi,bj)
./pkg/exf/exf_bulkformulae.F 323 EXF_BULKFORMULAE 
     &           ( cdrag_1/wsm + cdrag_2 + cdrag_3*wsm )
./pkg/exf/exf_bulkformulae.F 325 EXF_BULKFORMULAE 
            ustar(i,j) = rdn(i,j)*wsm
./pkg/exf/exf_wind.F 260 EXF_WIND 
           wsm     = sh(i,j,bi,bj)
./pkg/exf/exf_wind.F 262 EXF_WIND 
     &             * ( cdrag_1/wsm + cdrag_2 + cdrag_3*wsm )
./pkg/exf/exf_wind.F 68 EXF_WIND 
      _RL wsm, tmpbulk
./pkg/thsice/thsice_get_exf.F 244 THSICE_GET_EXF 
         wsm         = sh(i,j,bi,bj)
./pkg/thsice/thsice_get_exf.F 311 THSICE_GET_EXF 
          wsm        = sh(i,j,bi,bj)
./pkg/thsice/thsice_get_exf.F 312 THSICE_GET_EXF 
          tmpbulk    = cdrag_1/wsm + cdrag_2 + cdrag_3*wsm
./pkg/thsice/thsice_get_exf.F 322 THSICE_GET_EXF 
          ustar(i,j) = rdn(i,j)*wsm
./pkg/thsice/thsice_get_exf.F 466 THSICE_GET_EXF 
          wsm           = sh(i,j,bi,bj)
./pkg/thsice/thsice_get_exf.F 468 THSICE_GET_EXF 
          tau           = atmrho_loc(i,j)*exf_iceCe*wsm
./pkg/thsice/thsice_get_exf.F 470 THSICE_GET_EXF 
          tau           = atmrho*exf_iceCe*wsm
./pkg/thsice/thsice_get_exf.F 476 THSICE_GET_EXF 
     &                                *exf_iceCh*wsm*deltap(i,j)
./pkg/thsice/thsice_get_exf.F 478 THSICE_GET_EXF 
          hsLocal       = atmcp*atmrho*exf_iceCh*wsm*deltap(i,j)
./pkg/thsice/thsice_get_exf.F 483 THSICE_GET_EXF 
     &                     wsm,hlLocal,hsLocal,flxExcSw(i,j)
./pkg/thsice/thsice_get_exf.F 490 THSICE_GET_EXF 
          dfshdT        = -atmcp*atmrho_loc(i,j)*exf_iceCh*wsm
./pkg/thsice/thsice_get_exf.F 492 THSICE_GET_EXF 
          dfshdT        = -atmcp*atmrho*exf_iceCh*wsm
./pkg/thsice/thsice_get_exf.F 92 THSICE_GET_EXF 
      _RL wsm                ! limited wind speed [m/s] (> umin)
./pkg/bulk_force/bulkf_formula_lay.F 151 BULKF_FORMULA_LAY 
              wsm = MAX(ws,umin)
./pkg/bulk_force/bulkf_formula_lay.F 174 BULKF_FORMULA_LAY 
              tmpBlk = cdrag_1/wsm + cdrag_2 + cdrag_3*wsm
./pkg/bulk_force/bulkf_formula_lay.F 182 BULKF_FORMULA_LAY 
              ustar=rdn*wsm
./pkg/bulk_force/bulkf_formula_lay.F 221 BULKF_FORMULA_LAY 
                 ustar = rd*wsm
./pkg/bulk_force/bulkf_formula_lay.F 84 BULKF_FORMULA_LAY 
      _RL wsm                ! limited wind speed [m/s] (> umin)