Skip to content

File canopy_tleaf_mod.F90

FileList > src > canopy_tleaf_mod.F90

Go to the source code of this file

Leaf temperature calculation module for canopy model. More...

Namespaces

Type Name
namespace canopy_tleaf_mod

Public Attributes

Type Name
real(rk), parameter atemp_1_shade = -12.846\_rk
real(rk), parameter atemp_1_sun = -13.891\_rk
real(rk), parameter atemp_2_shade = -11.343\_rk
real(rk), parameter atemp_2_sun = -12.322\_rk
real(rk), parameter atemp_3_shade = -1.068\_rk
real(rk), parameter atemp_3_sun = -1.032\_rk
real(rk), parameter atemp_4_shade = -5.551\_rk
real(rk), parameter atemp_4_sun = -5.172\_rk
real(rk), parameter atemp_5_shade = -5.955\_rk
real(rk), parameter atemp_5_sun = -5.589\_rk
real(rk), dimension(size(zk)) atemp_shade
Regression coefficient A for shade leaves.
real(rk), dimension(size(zk)) atemp_sun
Regression coefficient A for sun leaves (Silva et al., 2020)
real(rk), parameter btemp_1_shade = 1.060\_rk
real(rk), parameter btemp_1_sun = 1.064\_rk
real(rk), parameter btemp_2_shade = 1.053\_rk
real(rk), parameter btemp_2_sun = 1.057\_rk
real(rk), parameter btemp_3_shade = 1.031\_rk
real(rk), parameter btemp_3_sun = 1.031\_rk
real(rk), parameter btemp_4_shade = 1.051\_rk
real(rk), parameter btemp_4_sun = 1.050\_rk
real(rk), parameter btemp_5_shade = 1.053\_rk
real(rk), parameter btemp_5_sun = 1.051\_rk
real(rk), dimension(size(zk)) btemp_shade
Regression coefficient B for shade leaves.
real(rk), dimension(size(zk)) btemp_sun
Regression coefficient B for sun leaves.
real(rk), intent(in) fch
Model input canopy height (m)
real(rk), dimension(:), intent(in) fsun
Sunlit/Shaded fraction from photolysis correction factor.
integer i
Loop index.
real(rk), intent(in) temp2
Model input 2-m Temperature (K)
real(rk), dimension(size(zk)), intent(out) tleaf_ave
Ave Leaf temp for sun/shaded leaves (K)
real(rk), dimension(size(zk)), intent(out) tleaf_shade
Leaf temp for shaded leaves (K)
real(rk), dimension(size(zk)), intent(out) tleaf_sun
Leaf temp for sunlit leaves (K)
real(rk), dimension(:), intent(in) zk
Input model heights (m)

Detailed Description

This module implements linear interpolation methods for calculating leaf temperatures for sunlit and shaded leaves throughout the canopy based on Silva et al. (2020) algorithms.

Author:

P.C. Campbell

Date:

June 2023

Version:

1.0

Public Attributes Documentation

variable atemp_1_shade

real(rk), parameter atemp_1_shade;

variable atemp_1_sun

real(rk), parameter atemp_1_sun;

variable atemp_2_shade

real(rk), parameter atemp_2_shade;

variable atemp_2_sun

real(rk), parameter atemp_2_sun;

variable atemp_3_shade

real(rk), parameter atemp_3_shade;

variable atemp_3_sun

real(rk), parameter atemp_3_sun;

variable atemp_4_shade

real(rk), parameter atemp_4_shade;

variable atemp_4_sun

real(rk), parameter atemp_4_sun;

variable atemp_5_shade

real(rk), parameter atemp_5_shade;

variable atemp_5_sun

real(rk), parameter atemp_5_sun;

variable atemp_shade

Regression coefficient A for shade leaves.

real(rk), dimension(size(zk)) atemp_shade;


variable atemp_sun

Regression coefficient A for sun leaves (Silva et al., 2020)

real(rk), dimension(size(zk)) atemp_sun;


variable btemp_1_shade

real(rk), parameter btemp_1_shade;

variable btemp_1_sun

real(rk), parameter btemp_1_sun;

variable btemp_2_shade

real(rk), parameter btemp_2_shade;

variable btemp_2_sun

real(rk), parameter btemp_2_sun;

variable btemp_3_shade

real(rk), parameter btemp_3_shade;

variable btemp_3_sun

real(rk), parameter btemp_3_sun;

variable btemp_4_shade

real(rk), parameter btemp_4_shade;

variable btemp_4_sun

real(rk), parameter btemp_4_sun;

variable btemp_5_shade

real(rk), parameter btemp_5_shade;

variable btemp_5_sun

real(rk), parameter btemp_5_sun;

variable btemp_shade

Regression coefficient B for shade leaves.

real(rk), dimension(size(zk)) btemp_shade;


variable btemp_sun

Regression coefficient B for sun leaves.

real(rk), dimension(size(zk)) btemp_sun;


variable fch

Model input canopy height (m)

real(rk), intent(in) fch;


variable fsun

Sunlit/Shaded fraction from photolysis correction factor.

real(rk), dimension(:), intent(in) fsun;


variable i

Loop index.

integer i;

Calculate linear change in parameters interpolated to Silva et al. 5 layer canopy regions Above canopy, Tleaf = Tair Level 1 - 2 Level 2 - 3 Level 3 - 4 Level 4 - Bottom


variable temp2

Model input 2-m Temperature (K)

real(rk), intent(in) temp2;


variable tleaf_ave

Ave Leaf temp for sun/shaded leaves (K)

real(rk), dimension(size(zk)), intent(out) tleaf_ave;


variable tleaf_shade

Leaf temp for shaded leaves (K)

real(rk), dimension(size(zk)), intent(out) tleaf_shade;


variable tleaf_sun

Leaf temp for sunlit leaves (K)

real(rk), dimension(size(zk)), intent(out) tleaf_sun;


variable zk

Input model heights (m)

real(rk), dimension(:), intent(in) zk;



The documentation for this class was generated from the following file src/canopy_tleaf_mod.F90