subroutine gfssflx::transp |
( |
integer, intent(in) | nsoil, |
|
|
integer, intent(in) | nroot, |
|
|
real (kind=kind_phys), intent(in) | etp1, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) | smc, |
|
|
real (kind=kind_phys), intent(in) | smcwlt, |
|
|
real (kind=kind_phys), intent(in) | smcref, |
|
|
real (kind=kind_phys), intent(in) | cmc, |
|
|
real (kind=kind_phys), intent(in) | cmcmax, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) | zsoil, |
|
|
real (kind=kind_phys), intent(in) | shdfac, |
|
|
real (kind=kind_phys), intent(in) | pc, |
|
|
real (kind=kind_phys), intent(in) | cfactr, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) | rtdis, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(out) | et1 ) |
|
private |