subroutine gfssflx::wdfcnd |
( |
real (kind=kind_phys), intent(in) | smc, |
|
|
real (kind=kind_phys), intent(in) | smcmax, |
|
|
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) | sicemax, |
|
|
real (kind=kind_phys), intent(out) | wdf, |
|
|
real (kind=kind_phys), intent(out) | wcnd ) |
|
private |