Symbol Description Uses
ustar 65


File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 2287 TRBFLX 
      sustar(i) = sustar(i) + aitr*ustar(i)
./pkg/exf/exf_bulkformulae.F 164 EXF_BULKFORMULAE 
      _RL     ustar
./pkg/exf/exf_bulkformulae.F 300 EXF_BULKFORMULAE 
                ustar = sqrt(ustmp/atmrho)
./pkg/exf/exf_bulkformulae.F 304 EXF_BULKFORMULAE 
                 ustar = 0. _d 0
./pkg/exf/exf_bulkformulae.F 309 EXF_BULKFORMULAE 
              if ( ustar .eq. 0. _d 0 ) then
./pkg/exf/exf_bulkformulae.F 311 EXF_BULKFORMULAE 
              else if ( ustar .lt. ustofu11 ) then
./pkg/exf/exf_bulkformulae.F 313 EXF_BULKFORMULAE 
                tmp2 = sqrt(tmp1*tmp1 + ustar*ustar/cquadrag_1)
./pkg/exf/exf_bulkformulae.F 317 EXF_BULKFORMULAE 
                tmp4 = ustar*ustar/clindrag_1/2 - tmp3**3
./pkg/exf/exf_bulkformulae.F 318 EXF_BULKFORMULAE 
                tmp5 = sqrt(ustar*ustar/clindrag_1*
./pkg/exf/exf_bulkformulae.F 319 EXF_BULKFORMULAE 
     &                      (ustar*ustar/clindrag_1/4 - tmp3**3))
./pkg/exf/exf_bulkformulae.F 325 EXF_BULKFORMULAE 
                 rdn = ustar/us
./pkg/exf/exf_bulkformulae.F 357 EXF_BULKFORMULAE 
                ustar  = rdn*sh
./pkg/exf/exf_bulkformulae.F 383 EXF_BULKFORMULAE 
     &                           ustar**2
./pkg/exf/exf_bulkformulae.F 426 EXF_BULKFORMULAE 
                  ustar  = rd*sh
./pkg/exf/exf_bulkformulae.F 429 EXF_BULKFORMULAE 
                  tau    = atmrho*ustar**2
./pkg/exf/exf_bulkformulae.F 443 EXF_BULKFORMULAE 
                hs(i,j,bi,bj)      = atmcp*tau*tstar/ustar
./pkg/exf/exf_bulkformulae.F 444 EXF_BULKFORMULAE 
                hl(i,j,bi,bj)      = flamb*tau*qstar/ustar
./pkg/exf/exf_bulkformulae.F 448 EXF_BULKFORMULAE 
                evap(i,j,bi,bj)    = -recip_rhonil*tau*qstar/ustar