subroutine sfc_diag::sfc_diag_run | ( | integer, intent(in) | im, |
real(kind=kind_phys), dimension(:), intent(in) | xlat_d, | ||
real(kind=kind_phys), dimension(:), intent(in) | xlon_d, | ||
integer, intent(in) | lsm, | ||
integer, intent(in) | lsm_ruc, | ||
real(kind=kind_phys), intent(in) | grav, | ||
real(kind=kind_phys), intent(in) | cp, | ||
real(kind=kind_phys), intent(in) | eps, | ||
real(kind=kind_phys), intent(in) | epsm1, | ||
real(kind=kind_phys), intent(in) | con_rocp, | ||
real(kind=kind_phys), intent(in) | con_karman, | ||
real(kind=kind_phys), dimension(:), intent(in) | shflx, | ||
real(kind=kind_phys), dimension(:), intent(in) | cdq, | ||
real(kind=kind_phys), dimension(:), intent(in) | wind, | ||
real(kind=kind_phys), dimension(:), intent(in) | usfco, | ||
real(kind=kind_phys), dimension(:), intent(in) | vsfco, | ||
integer, intent(in) | icplocn2atm, | ||
real(kind=kind_phys), dimension(:), intent(in) | zf, | ||
real(kind=kind_phys), dimension(:), intent(in) | ps, | ||
real(kind=kind_phys), dimension(:), intent(in) | u1, | ||
real(kind=kind_phys), dimension(:), intent(in) | v1, | ||
real(kind=kind_phys), dimension(:), intent(in) | t1, | ||
real(kind=kind_phys), dimension(:), intent(in) | q1, | ||
real(kind=kind_phys), dimension(:), intent(in) | prslki, | ||
real(kind=kind_phys), dimension(:), intent(in) | evap, | ||
real(kind=kind_phys), dimension(:), intent(in) | fm, | ||
real(kind=kind_phys), dimension(:), intent(in) | fh, | ||
real(kind=kind_phys), dimension(:), intent(in) | fm10, | ||
real(kind=kind_phys), dimension(:), intent(in) | fh2, | ||
real(kind=kind_phys), dimension(:), intent(in) | ust, | ||
real(kind=kind_phys), dimension(:), intent(in) | tskin, | ||
real(kind=kind_phys), dimension(:), intent(in) | qsurf, | ||
logical, intent(in) | thsfc_loc, | ||
logical, intent(in) | diag_flux, | ||
logical, intent(in) | diag_log, | ||
integer, dimension(:), intent(in) | use_lake_model, | ||
integer, intent(in) | iopt_lake, | ||
integer, intent(in) | iopt_lake_clm, | ||
real(kind=kind_phys), dimension(:), intent(in), optional | lake_t2m, | ||
real(kind=kind_phys), dimension(:), intent(in), optional | lake_q2m, | ||
logical, intent(in) | use_lake2m, | ||
real(kind=kind_phys), dimension(:), intent(out) | f10m, | ||
real(kind=kind_phys), dimension(:), intent(out) | u10m, | ||
real(kind=kind_phys), dimension(:), intent(out) | v10m, | ||
real(kind=kind_phys), dimension(:), intent(out) | t2m, | ||
real(kind=kind_phys), dimension(:), intent(out) | q2m, | ||
real(kind=kind_phys), dimension(:), intent(out) | dpt2m, | ||
character(len=*), intent(out) | errmsg, | ||
integer, intent(out) | errflg ) |
Definition at line 13 of file sfc_diag.f.
References shflx().