Symbol Description Uses
usr 27


File Line number Procedure Code
./pkg/cheapaml/cheapaml_coare3_flux.F 132 CHEAPAML_COARE3_FLUX 
      usr = 0.035 _d 0*u10
./pkg/cheapaml/cheapaml_coare3_flux.F 133 CHEAPAML_COARE3_FLUX 
      zo10= 0.011 _d 0*usr*usr/gravity+0.11 _d 0*visa/usr
./pkg/cheapaml/cheapaml_coare3_flux.F 164 CHEAPAML_COARE3_FLUX 
      usr= Du*xkar/(LOG(zu/zo10)-psiu(zu/L10))
./pkg/cheapaml/cheapaml_coare3_flux.F 177 CHEAPAML_COARE3_FLUX 
        zo=charn*usr*usr/gravity + 0.11 _d 0*visa/usr    !after Smith 1988
./pkg/cheapaml/cheapaml_coare3_flux.F 179 CHEAPAML_COARE3_FLUX 
        zo=(50./twoPI)*lwave*(usr/cwave)**4.5 _d 0
./pkg/cheapaml/cheapaml_coare3_flux.F 180 CHEAPAML_COARE3_FLUX 
     &    + 0.11 _d 0*visa/usr !Oost et al.
./pkg/cheapaml/cheapaml_coare3_flux.F 183 CHEAPAML_COARE3_FLUX 
     &    + 0.11 _d 0*visa/usr !Taylor and Yelland
./pkg/cheapaml/cheapaml_coare3_flux.F 185 CHEAPAML_COARE3_FLUX 
       rr=zo*usr/visa
./pkg/cheapaml/cheapaml_coare3_flux.F 194 CHEAPAML_COARE3_FLUX 
     &    ' rr,zo,usr,visa=', rr, zo, usr, visa
./pkg/cheapaml/cheapaml_coare3_flux.F 200 CHEAPAML_COARE3_FLUX 
     &         /( tta*usr*usr*(1. _d 0+0.61 _d 0*q) )
./pkg/cheapaml/cheapaml_coare3_flux.F 210 CHEAPAML_COARE3_FLUX 
     &                   /( tta*usr*usr*(1. _d 0+0.61 _d 0*q) )
./pkg/cheapaml/cheapaml_coare3_flux.F 214 CHEAPAML_COARE3_FLUX 
       usr=Du*xkar/(LOG(zu/zo)-psiu(zu/L))
./pkg/cheapaml/cheapaml_coare3_flux.F 217 CHEAPAML_COARE3_FLUX 
       Bf=-gravity/tta*usr*(tsr+0.61 _d 0*tta*qsr)
./pkg/cheapaml/cheapaml_coare3_flux.F 227 CHEAPAML_COARE3_FLUX 
      tau=rhoa*usr*usr               !stress N/m2
./pkg/cheapaml/cheapaml_coare3_flux.F 228 CHEAPAML_COARE3_FLUX 
      hf=-cpair*rhoa*usr*tsr         !sensible W/m2
./pkg/cheapaml/cheapaml_coare3_flux.F 229 CHEAPAML_COARE3_FLUX 
      ef=-lath*rhoa*usr*qsr          !latent W/m2
./pkg/cheapaml/cheapaml_coare3_flux.F 230 CHEAPAML_COARE3_FLUX 
      evap=-rhoa*usr*qsr
./pkg/cheapaml/cheapaml_coare3_flux.F 238 CHEAPAML_COARE3_FLUX 
      dSensdTs = cpair*rhoa*usr
./pkg/cheapaml/cheapaml_coare3_flux.F 245 CHEAPAML_COARE3_FLUX 
      dEvapdTs = rhoa*usr*( xkar/(LOG(zq/zoq)-psit(zq/L)) )
./pkg/cheapaml/cheapaml_coare3_flux.F 58 CHEAPAML_COARE3_FLUX 
      _RL CD,usr,tsr,qsr