subroutine gfssflx::tmpavg |
( |
real (kind=kind_phys), intent(in) |
tup, |
|
|
real (kind=kind_phys), intent(in) |
tm, |
|
|
real (kind=kind_phys), intent(in) |
tdn, |
|
|
real (kind=kind_phys), dimension(nsoil), intent(in) |
zsoil, |
|
|
integer, intent(in) |
nsoil, |
|
|
integer, intent(in) |
k, |
|
|
real (kind=kind_phys), intent(out) |
tavg |
|
) |
| |
|
private |