subroutine, public lsm_noah::lsm_noah_run | ( | integer, intent(in) | im, |
integer, intent(in) | km, | ||
real (kind=kind_phys), intent(in) | grav, | ||
real (kind=kind_phys), intent(in) | cp, | ||
real (kind=kind_phys), intent(in) | hvap, | ||
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), dimension(im), intent(in) | ps, | ||
real (kind=kind_phys), dimension(im), intent(in) | t1, | ||
real (kind=kind_phys), dimension(im), intent(in) | q1, | ||
integer, dimension(im), intent(in) | soiltyp, | ||
integer, dimension(im), intent(in) | vegtype, | ||
real (kind=kind_phys), dimension(im), intent(in) | sigmaf, | ||
real (kind=kind_phys), dimension(im), intent(in) | sfcemis, | ||
real (kind=kind_phys), dimension(im), intent(in) | dlwflx, | ||
real (kind=kind_phys), dimension(im), intent(in) | dswsfc, | ||
real (kind=kind_phys), dimension(im), intent(in) | snet, | ||
real (kind=kind_phys), intent(in) | delt, | ||
real (kind=kind_phys), dimension(im), intent(in) | tg3, | ||
real (kind=kind_phys), dimension(im), intent(in) | cm, | ||
real (kind=kind_phys), dimension(im), intent(in) | ch, | ||
real (kind=kind_phys), dimension(im), intent(in) | prsl1, | ||
real (kind=kind_phys), dimension(im), intent(in) | prslki, | ||
real (kind=kind_phys), dimension(im), intent(in) | zf, | ||
logical, dimension(im), intent(in) | land, | ||
real (kind=kind_phys), dimension(im), intent(in) | wind, | ||
integer, dimension(im), intent(in) | slopetyp, | ||
real (kind=kind_phys), dimension(im), intent(in) | shdmin, | ||
real (kind=kind_phys), dimension(im), intent(in) | shdmax, | ||
real (kind=kind_phys), dimension(im), intent(in) | snoalb, | ||
real (kind=kind_phys), dimension(im), intent(in) | sfalb, | ||
logical, dimension(im), intent(in) | flag_iter, | ||
logical, dimension(im), intent(in) | flag_guess, | ||
logical, intent(in) | lheatstrg, | ||
integer, intent(in) | isot, | ||
integer, intent(in) | ivegsrc, | ||
real (kind=kind_phys), dimension(im), intent(in) | bexppert, | ||
real (kind=kind_phys), dimension(im), intent(in) | xlaipert, | ||
real (kind=kind_phys), dimension(im), intent(in) | vegfpert, | ||
real (kind=kind_phys), dimension(5), intent(in) | pertvegf | ||
) |
References funcphys::fpvs(), and gfssflx().