subroutine module_sf_ruclsm::vilka |
( |
real (kind_phys), intent(in) |
TN, |
|
|
real (kind_phys), intent(in) |
D1, |
|
|
real (kind_phys), intent(in) |
D2, |
|
|
real (kind_phys), intent(in) |
PP, |
|
|
real (kind_phys), intent(out) |
QS, |
|
|
real (kind_phys), intent(out) |
TS, |
|
|
real (kind_phys), dimension(1:5001), intent(in) |
TT, |
|
|
integer, intent(in) |
NSTEP, |
|
|
integer, intent(in) |
ii, |
|
|
integer, intent(in) |
j, |
|
|
integer, intent(in) |
iland, |
|
|
integer, intent(in) |
isoil, |
|
|
real (kind_phys), intent(in) |
xlat, |
|
|
real (kind_phys), intent(in) |
xlon |
|
) |
| |
|
private |