Symbol Description Uses
rd 26


File Line number Procedure Code
./pkg/thsice/thsice_get_exf.F 267 THSICE_GET_EXF 
            rd     = rdn/( exf_one + rdn*(zwln-psimh)/karman )
./pkg/thsice/thsice_get_exf.F 272 THSICE_GET_EXF 
            ustar  = rd*wsm
./pkg/thsice/thsice_get_exf.F 277 THSICE_GET_EXF 
           tau     = atmrho*rd*ws
./pkg/thsice/thsice_get_exf.F 83 THSICE_GET_EXF 
      _RL rd                 ! = sqrt(Cd)          [-]
./pkg/bulk_force/bulkf_formula_lanl.F 181 BULKF_FORMULA_LANL 
                 rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar)
./pkg/bulk_force/bulkf_formula_lanl.F 185 BULKF_FORMULA_LANL 
                 ustar = rd*usm
./pkg/bulk_force/bulkf_formula_lanl.F 192 BULKF_FORMULA_LANL 
              csha  = rhoa*cpair*us*rh*rd
./pkg/bulk_force/bulkf_formula_lanl.F 193 BULKF_FORMULA_LANL 
              clha  = rhoa*lath*us*re*rd
./pkg/bulk_force/bulkf_formula_lanl.F 86 BULKF_FORMULA_LANL 
      _RL rd                 ! = sqrt(Cd)          [-]
./pkg/bulk_force/bulkf_formula_lay.F 216 BULKF_FORMULA_LAY 
                 rd = rdn/(1. _d 0 + rdn*(zwln-psimh)/xkar)
./pkg/bulk_force/bulkf_formula_lay.F 221 BULKF_FORMULA_LAY 
                 ustar = rd*wsm
./pkg/bulk_force/bulkf_formula_lay.F 228 BULKF_FORMULA_LAY 
              tau   = rhoA*rd*ws
./pkg/bulk_force/bulkf_formula_lay.F 236 BULKF_FORMULA_LAY 
              ust   = tau*rd*uw
./pkg/bulk_force/bulkf_formula_lay.F 237 BULKF_FORMULA_LAY 
              vst   = tau*rd*vw
./pkg/bulk_force/bulkf_formula_lay.F 95 BULKF_FORMULA_LAY 
      _RL rd                 ! = sqrt(Cd)          [-]
./pkg/cheapaml/cheapaml.F 318 CHEAPAML 
                 rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar)
./pkg/cheapaml/cheapaml.F 322 CHEAPAML 
                 ustar = rd*usm
./pkg/cheapaml/cheapaml.F 331 CHEAPAML 
                csha   = rhoa*cpair*usm*rh*rd
./pkg/cheapaml/cheapaml.F 332 CHEAPAML 
                clha   = rhoa*lath*usm*re*rd
./pkg/cheapaml/cheapaml.F 87 CHEAPAML 
        _RL rd,re,rh,tta,toa
./pkg/exf/exf_bulkformulae.F 187 EXF_BULKFORMULAE 
      _RL rd    (1:sNx,1:sNy)   ! = sqrt(Cd)          [-]
./pkg/exf/exf_bulkformulae.F 430 EXF_BULKFORMULAE 
             rd(i,j)    = rdn(i,j)/(exf_one + rdn(i,j)*dzTmp)
./pkg/exf/exf_bulkformulae.F 432 EXF_BULKFORMULAE 
             rd(i,j)    = rdn(i,j)/(exf_one - rdn(i,j)/karman*psimh)
./pkg/exf/exf_bulkformulae.F 434 EXF_BULKFORMULAE 
             ustar(i,j) = rd(i,j)*sh(i,j,bi,bj)
./pkg/exf/exf_bulkformulae.F 436 EXF_BULKFORMULAE 
             tau(i,j)   = atmrho*rd(i,j)*wspeed(i,j,bi,bj)
./pkg/exf/exf_bulkformulae.F 491 EXF_BULKFORMULAE 
           tmpbulk =  tau(i,j)*rd(i,j)