CCPP SciDoc for Idealized Regional TC Capability  SRW v3.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches

◆ scm_sfc_flux_spec_run()

subroutine, public scm_sfc_flux_spec::scm_sfc_flux_spec_run ( integer, intent(in) im,
real(kind=kind_phys), dimension(:), intent(in) u1,
real(kind=kind_phys), dimension(:), intent(in) v1,
real(kind=kind_phys), dimension(:), intent(in) z1,
real(kind=kind_phys), dimension(:), intent(in) t1,
real(kind=kind_phys), dimension(:), intent(in) q1,
real(kind=kind_phys), dimension(:), intent(in) p1,
real(kind=kind_phys), dimension(:), intent(in) roughness_length,
real(kind=kind_phys), dimension(:), intent(in) spec_sh_flux,
real(kind=kind_phys), dimension(:), intent(in) spec_lh_flux,
real(kind=kind_phys), dimension(:), intent(in) exner_inverse,
real(kind=kind_phys), dimension(:), intent(in) t_surf,
real(kind=kind_phys), intent(in) cp,
real(kind=kind_phys), intent(in) grav,
real(kind=kind_phys), intent(in) hvap,
real(kind=kind_phys), intent(in) rd,
real(kind=kind_phys), intent(in) fvirt,
real(kind=kind_phys), intent(in) vonkarman,
real(kind=kind_phys), intent(in) tgice,
integer, dimension(:), intent(inout) islmsk,
logical, dimension(:), intent(inout) dry,
real(kind=kind_phys), dimension(:), intent(out) frland,
real(kind=kind_phys), dimension(:), intent(inout) cice,
logical, dimension(:), intent(inout) icy,
real(kind=kind_phys), dimension(:), intent(inout) tisfc,
real(kind=kind_phys), dimension(:), intent(in) oceanfrac,
real(kind=kind_phys), intent(in) min_seaice,
logical, intent(in) cplflx,
logical, intent(in) cplice,
logical, dimension(:), intent(inout) flag_cice,
logical, dimension(:), intent(inout) wet,
real(kind=kind_phys), intent(in) min_lakeice,
real(kind=kind_phys), dimension(:), intent(inout) tsfcl,
real(kind=kind_phys), dimension(:), intent(inout) tsfc_wat,
real(kind=kind_phys), dimension(:), intent(inout) slmsk,
real(kind=kind_phys), dimension(:), intent(in) lakefrac,
integer, intent(in) lkm,
real(kind=kind_phys), dimension(:), intent(in) lakedepth,
integer, dimension(:), intent(inout) use_lake_model,
real(kind=kind_phys), dimension(:), intent(out) sh_flux,
real(kind=kind_phys), dimension(:), intent(out) lh_flux,
real(kind=kind_phys), dimension(:), intent(out) sh_flux_chs,
real(kind=kind_phys), dimension(:), intent(out) u_star,
real(kind=kind_phys), dimension(:), intent(out) sfc_stress,
real(kind=kind_phys), dimension(:), intent(out) cm,
real(kind=kind_phys), dimension(:), intent(out) ch,
real(kind=kind_phys), dimension(:), intent(out) fm,
real(kind=kind_phys), dimension(:), intent(out) fh,
real(kind=kind_phys), dimension(:), intent(out) rb,
real(kind=kind_phys), dimension(:), intent(out) u10m,
real(kind=kind_phys), dimension(:), intent(out) v10m,
real(kind=kind_phys), dimension(:), intent(out) wind1,
real(kind=kind_phys), dimension(:), intent(out) qss,
real(kind=kind_phys), dimension(:), intent(out) t2m,
real(kind=kind_phys), dimension(:), intent(out) q2m,
character(len=*), intent(out) errmsg,
integer, intent(out) errflg )

Argument Table

General Algorithm

  1. Compute friction velocity from the wind speed at the lowest model layer, the height about the ground, and the roughness length.
  2. Compute the surface stress from the friction velocity.
  3. Calculate the surface drag coefficient for momentum given the surface stress and wind on the lowest model layer.
  4. Calculate the Monin-Obukhov similarity funciton for momentum from the surface drag coefficient.
  5. Calculate the Obukhov length from the friction velocity, surface virtual potential temperature, and surface vertical virtual potential temperature flux.
  6. Calculate the bulk Richardson number at the lowest model layer.
  7. Calculate the Monin-Obukhov similarity function for heat and moisture from the bulk Richardson number and diagnosed similarity function for momentum.
  8. Calculate the surface drag coefficient for heat and moisture.
  9. Calculate the u and v wind at 10m.