PhotosynthesisHydraulicStress Subroutine

public subroutine PhotosynthesisHydraulicStress(bounds, fn, filterp, esat_tv, eair, oair, cair, rb, bsun, bsha, btran, dayl_factor, leafn, qsatl, qaf, atm2lnd_inst, temperature_inst, soilstate_inst, waterstate_inst, surfalb_inst, solarabs_inst, canopystate_inst, ozone_inst, photosyns_inst, waterflux_inst, froot_carbon, croot_carbon)

!

Arguments

Type IntentOptional Attributes Name
type(bounds_type), intent(in) :: bounds
integer, intent(in) :: fn
integer, intent(in) :: filterp(fn)
real(kind=r8), intent(in) :: esat_tv(bounds%begp:)
real(kind=r8), intent(in) :: eair(bounds%begp:)
real(kind=r8), intent(in) :: oair(bounds%begp:)
real(kind=r8), intent(in) :: cair(bounds%begp:)
real(kind=r8), intent(in) :: rb(bounds%begp:)
real(kind=r8), intent(out) :: bsun(bounds%begp:)
real(kind=r8), intent(out) :: bsha(bounds%begp:)
real(kind=r8), intent(out) :: btran(bounds%begp:)
real(kind=r8), intent(in) :: dayl_factor(bounds%begp:)
real(kind=r8), intent(in) :: leafn(bounds%begp:)
real(kind=r8), intent(in) :: qsatl(bounds%begp:)
real(kind=r8), intent(in) :: qaf(bounds%begp:)
type(atm2lnd_type), intent(in) :: atm2lnd_inst
type(temperature_type), intent(in) :: temperature_inst
type(soilstate_type), intent(inout) :: soilstate_inst
type(waterstate_type), intent(inout) :: waterstate_inst
type(surfalb_type), intent(in) :: surfalb_inst
type(solarabs_type), intent(in) :: solarabs_inst
type(CanopyState_type), intent(inout) :: canopystate_inst
class(ozone_base_type), intent(in) :: ozone_inst
type(photosyns_type), intent(inout) :: photosyns_inst
type(waterflux_type), intent(inout) :: waterflux_inst
real(kind=r8), intent(in) :: froot_carbon(bounds%begp:)
real(kind=r8), intent(in) :: croot_carbon(bounds%begp:)