| subroutine mynnsfc_wrapper::mynnsfc_wrapper_run | ( | integer, intent(in) | im, |
| integer, intent(in) | levs, | ||
| integer, intent(in) | itimestep, | ||
| integer, intent(in) | iter, | ||
| logical, dimension(:), intent(in) | flag_iter, | ||
| logical, intent(in) | flag_init, | ||
| logical, intent(in) | flag_restart, | ||
| integer, intent(in) | lsm, | ||
| integer, intent(in) | lsm_ruc, | ||
| real(kind_phys), dimension(:), intent(in) | sigmaf, | ||
| integer, dimension(:), intent(in) | vegtype, | ||
| real(kind_phys), dimension(:), intent(in) | shdmax, | ||
| integer, intent(in) | ivegsrc, | ||
| real(kind_phys), dimension(:), intent(in) | z0pert, | ||
| real(kind_phys), dimension(:), intent(in) | ztpert, | ||
| logical, intent(in) | redrag, | ||
| integer, intent(in) | sfc_z0_type, | ||
| integer, intent(in) | isftcflx, | ||
| integer, intent(in) | iz0tlnd, | ||
| logical, intent(in) | sfclay_compute_flux, | ||
| logical, intent(in) | sfclay_compute_diag, | ||
| real(kind_phys), intent(in) | delt, | ||
| real(kind_phys), dimension(:), intent(in) | dx, | ||
| real(kind_phys), dimension(:,:), intent(in) | u, | ||
| real(kind_phys), dimension(:,:), intent(in) | v, | ||
| real(kind_phys), dimension(:,:), intent(in) | t3d, | ||
| real(kind_phys), dimension(:,:), intent(in) | qvsh, | ||
| real(kind_phys), dimension(:,:), intent(in) | qc, | ||
| real(kind_phys), dimension(:,:), intent(in) | prsl, | ||
| real(kind_phys), dimension(:,:), intent(in) | phii, | ||
| real(kind_phys), dimension(:,:), intent(in) | exner, | ||
| real(kind_phys), dimension(:), intent(in) | ps, | ||
| real(kind_phys), dimension(:), intent(in) | pblh, | ||
| real(kind_phys), dimension(:), intent(in) | slmsk, | ||
| logical, dimension(:), intent(in) | wet, | ||
| logical, dimension(:), intent(in) | dry, | ||
| logical, dimension(:), intent(in) | icy, | ||
| real(kind_phys), dimension(:), intent(in) | tskin_wat, | ||
| real(kind_phys), dimension(:), intent(in) | tskin_lnd, | ||
| real(kind_phys), dimension(:), intent(in) | tskin_ice, | ||
| real(kind_phys), dimension(:), intent(in) | tsurf_wat, | ||
| real(kind_phys), dimension(:), intent(in) | tsurf_lnd, | ||
| real(kind_phys), dimension(:), intent(in) | tsurf_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | qsfc_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | qsfc_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | qsfc_ice, | ||
| real(kind_phys), dimension(:), intent(in) | snowh_lnd, | ||
| real(kind_phys), dimension(:), intent(in) | snowh_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | znt_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | znt_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | znt_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | ust_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | ust_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | ust_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | cm_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | cm_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | cm_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | ch_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | ch_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | ch_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | rb_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | rb_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | rb_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | stress_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | stress_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | stress_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | fm_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | fm_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | fm_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | fh_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | fh_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | fh_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | fm10_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | fm10_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | fm10_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | fh2_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | fh2_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | fh2_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | hflx_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | hflx_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | hflx_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | qflx_wat, | ||
| real(kind_phys), dimension(:), intent(inout) | qflx_lnd, | ||
| real(kind_phys), dimension(:), intent(inout) | qflx_ice, | ||
| real(kind_phys), dimension(:), intent(inout) | qsfc, | ||
| real(kind_phys), dimension(:), intent(in), optional | qsfc_lnd_ruc, | ||
| real(kind_phys), dimension(:), intent(in), optional | qsfc_ice_ruc, | ||
| real(kind_phys), dimension(:), intent(inout) | ustm, | ||
| real(kind_phys), dimension(:), intent(inout) | zol, | ||
| real(kind_phys), dimension(:), intent(inout) | mol, | ||
| real(kind_phys), dimension(:), intent(inout) | rmol, | ||
| real(kind_phys), dimension(:), intent(inout) | wspd, | ||
| real(kind_phys), dimension(:), intent(inout) | ch, | ||
| real(kind_phys), dimension(:), intent(inout) | hflx, | ||
| real(kind_phys), dimension(:), intent(inout) | qflx, | ||
| real(kind_phys), dimension(:), intent(inout) | lh, | ||
| real(kind_phys), dimension(:), intent(inout) | flhc, | ||
| real(kind_phys), dimension(:), intent(inout) | flqc, | ||
| real(kind_phys), dimension(:), intent(inout) | u10, | ||
| real(kind_phys), dimension(:), intent(inout) | v10, | ||
| real(kind_phys), dimension(:), intent(inout) | th2, | ||
| real(kind_phys), dimension(:), intent(inout) | t2, | ||
| real(kind_phys), dimension(:), intent(inout) | q2, | ||
| real(kind_phys), dimension(:), intent(inout) | wstar, | ||
| real(kind_phys), dimension(:), intent(inout) | chs2, | ||
| real(kind_phys), dimension(:), intent(inout) | cqs2, | ||
| real(kind_phys), dimension(:,:), intent(in), optional | spp_wts_sfc, | ||
| integer, intent(in) | spp_sfc, | ||
| logical, intent(in) | lprnt, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |