subroutine, private module_sf_noahmplsm::stomata |
( |
type (noahmp_parameters), intent(in) |
parameters, |
|
|
integer, intent(in) |
vegtyp, |
|
|
real (kind=kind_phys), intent(in) |
mpe, |
|
|
real (kind=kind_phys), intent(in) |
apar, |
|
|
real (kind=kind_phys), intent(in) |
foln, |
|
|
integer, intent(in) |
iloc, |
|
|
integer, intent(in) |
jloc, |
|
|
real (kind=kind_phys), intent(in) |
tv, |
|
|
real (kind=kind_phys), intent(in) |
ei, |
|
|
real (kind=kind_phys), intent(in) |
ea, |
|
|
real (kind=kind_phys), intent(in) |
sfctmp, |
|
|
real (kind=kind_phys), intent(in) |
sfcprs, |
|
|
real (kind=kind_phys), intent(in) |
o2, |
|
|
real (kind=kind_phys), intent(in) |
co2, |
|
|
real (kind=kind_phys), intent(in) |
igs, |
|
|
real (kind=kind_phys), intent(in) |
btran, |
|
|
real (kind=kind_phys), intent(in) |
rb, |
|
|
real (kind=kind_phys), intent(out) |
rs, |
|
|
real (kind=kind_phys), intent(out) |
psn |
|
) |
| |
|
private |