subroutine module_sf_ruclsm::soilmoist |
( |
logical, intent(in) | debug_print, |
|
|
real (kind_phys), intent(in) | xlat, |
|
|
real (kind_phys), intent(in) | xlon, |
|
|
real (kind_phys), intent(in) | testptlat, |
|
|
real (kind_phys), intent(in) | testptlon, |
|
|
real (kind_phys), intent(in) | delt, |
|
|
integer, intent(in) | nzs, |
|
|
integer, intent(in) | nddzs, |
|
|
real (kind_phys), dimension(1:nddzs), intent(in) | dtdzs, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | dtdzs2, |
|
|
real (kind_phys), intent(in) | riw, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | zsmain, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | zshalf, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | diffu, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | hydro, |
|
|
real (kind_phys), intent(in) | qsg, |
|
|
real (kind_phys), intent(in) | qvg, |
|
|
real (kind_phys), intent(in) | qcg, |
|
|
real (kind_phys), intent(in) | qcatm, |
|
|
real (kind_phys), intent(in) | qvatm, |
|
|
real (kind_phys), intent(in) | prcp, |
|
|
real (kind_phys), intent(in) | qkms, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | transp, |
|
|
real (kind_phys), intent(in) | drip, |
|
|
real (kind_phys), intent(in) | dew, |
|
|
real (kind_phys), intent(in) | smelt, |
|
|
real (kind_phys), dimension(1:nzs), intent(in) | soilice, |
|
|
real (kind_phys), intent(in) | vegfrac, |
|
|
real (kind_phys), intent(in) | snowfrac, |
|
|
real (kind_phys), intent(in) | soilres, |
|
|
real (kind_phys), intent(in) | dqm, |
|
|
real (kind_phys), intent(in) | qmin, |
|
|
real (kind_phys), intent(in) | ref, |
|
|
real (kind_phys), intent(in) | ksat, |
|
|
real (kind_phys), intent(in) | ras, |
|
|
real (kind_phys), intent(inout) | infmax, |
|
|
real (kind_phys), dimension( 1:nzs ), intent(inout) | soilmois, |
|
|
real (kind_phys), dimension( 1:nzs ), intent(inout) | soiliqw, |
|
|
real (kind_phys), intent(inout) | mavail, |
|
|
real (kind_phys), intent(inout) | runoff, |
|
|
real (kind_phys), intent(inout) | runoff2, |
|
|
real (kind_phys), intent(inout) | infiltrp ) |
|
private |