subroutine gfssflx::smflx |
( |
integer, intent(in) | nsoil, |
|
|
real (kind=kind_phys), intent(in) | dt, |
|
|
real (kind=kind_phys), intent(in) | kdt, |
|
|
real (kind=kind_phys), intent(in) | smcmax, |
|
|
real (kind=kind_phys), intent(in) | smcwlt, |
|
|
real (kind=kind_phys), intent(in) | cmcmax, |
|
|
real (kind=kind_phys), intent(in) | prcp1, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) | zsoil, |
|
|
real (kind=kind_phys), intent(in) | slope, |
|
|
real (kind=kind_phys), intent(in) | frzx, |
|
|
real (kind=kind_phys), intent(in) | bexp, |
|
|
real (kind=kind_phys), intent(in) | dksat, |
|
|
real (kind=kind_phys), intent(in) | dwsat, |
|
|
real (kind=kind_phys), intent(in) | shdfac, |
|
|
real (kind=kind_phys), intent(in) | edir1, |
|
|
real (kind=kind_phys), intent(in) | ec1, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) | et1, |
|
|
real (kind=kind_phys), intent(inout) | cmc, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(inout) | sh2o, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(inout) | smc, |
|
|
real (kind=kind_phys), intent(out) | runoff1, |
|
|
real (kind=kind_phys), intent(out) | runoff2, |
|
|
real (kind=kind_phys), intent(out) | runoff3, |
|
|
real (kind=kind_phys), intent(out) | drip ) |
|
private |