| subroutine sfc_land::sfc_land_run | ( | integer, intent(in) | im, |
| logical, intent(in) | flag_init, | ||
| logical, intent(in) | flag_restart, | ||
| logical, intent(in) | cpllnd, | ||
| logical, intent(in) | cpllnd2atm, | ||
| logical, dimension(:), intent(in) | flag_iter, | ||
| logical, dimension(:), intent(in) | dry, | ||
| real(kind=kind_phys), dimension(:), intent(in) | t1, | ||
| real(kind=kind_phys), dimension(:), intent(in) | q1, | ||
| real(kind=kind_phys), dimension(:), intent(in) | prsl1, | ||
| real(kind=kind_phys), dimension(:), intent(in) | prslki, | ||
| real(kind=kind_phys), dimension(:), intent(in) | ps, | ||
| real(kind=kind_phys), dimension(:), intent(in) | tskin, | ||
| real(kind=kind_phys), dimension(:), intent(in) | wind, | ||
| real(kind=kind_phys), dimension(:), intent(in) | cm, | ||
| real(kind=kind_phys), dimension(:), intent(in) | ch, | ||
| real(kind=kind_phys), dimension(:), intent(in) | dlwflx, | ||
| real(kind=kind_phys), dimension(:), intent(in) | dswsfc, | ||
| real(kind=kind_phys), dimension(:), intent(in) | sfalb, | ||
| real(kind=kind_phys), dimension(:), intent(in) | sfcemis, | ||
| real(kind=kind_phys), intent(in) | rd, | ||
| real(kind=kind_phys), intent(in) | eps, | ||
| real(kind=kind_phys), intent(in) | epsm1, | ||
| real(kind=kind_phys), intent(in) | rvrdm1, | ||
| real(kind=kind_phys), intent(in) | hvap, | ||
| real(kind=kind_phys), intent(in) | cp, | ||
| real(kind=kind_phys), intent(in) | con_sbc, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | sncovr1_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | qsurf_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | evap_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | hflx_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | ep_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | t2mmp_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | q2mp_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | gflux_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | runoff_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | drain_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | cmm_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | chh_lnd, | ||
| real(kind=kind_phys), dimension(:), intent(in), optional | zvfun_lnd, | ||
| real(kind=kind_phys), dimension(:,:), intent(in), optional | slc, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | sncovr1, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | qsurf, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | evap, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | hflx, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | ep, | ||
| real(kind=kind_phys), dimension(:), intent(inout), optional | t2mmp, | ||
| real(kind=kind_phys), dimension(:), intent(inout), optional | q2mp, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | gflux, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | runoff, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | drain, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | cmm, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | chh, | ||
| real(kind=kind_phys), dimension(:), intent(inout) | zvfun, | ||
| character(len=*), intent(out) | errmsg, | ||
| integer, intent(out) | errflg ) |