SurfaceAlbedoType Module



Derived Types

type, public ::  surfalb_type

Components

Type Visibility Attributes Name Initial
real(kind=r8), public, pointer :: coszen_col(:)
real(kind=r8), public, pointer :: albd_patch(:,:)
real(kind=r8), public, pointer :: albi_patch(:,:)
real(kind=r8), public, pointer :: albdSF_patch(:,:)
real(kind=r8), public, pointer :: albiSF_patch(:,:)
real(kind=r8), public, pointer :: albgrd_pur_col(:,:)
real(kind=r8), public, pointer :: albgri_pur_col(:,:)
real(kind=r8), public, pointer :: albgrd_bc_col(:,:)
real(kind=r8), public, pointer :: albgri_bc_col(:,:)
real(kind=r8), public, pointer :: albgrd_oc_col(:,:)
real(kind=r8), public, pointer :: albgri_oc_col(:,:)
real(kind=r8), public, pointer :: albgrd_dst_col(:,:)
real(kind=r8), public, pointer :: albgri_dst_col(:,:)
real(kind=r8), public, pointer :: albgrd_col(:,:)
real(kind=r8), public, pointer :: albgri_col(:,:)
real(kind=r8), public, pointer :: albsod_col(:,:)
real(kind=r8), public, pointer :: albsoi_col(:,:)
real(kind=r8), public, pointer :: albsnd_hst_col(:,:)
real(kind=r8), public, pointer :: albsni_hst_col(:,:)
real(kind=r8), public, pointer :: ftdd_patch(:,:)
real(kind=r8), public, pointer :: ftid_patch(:,:)
real(kind=r8), public, pointer :: ftii_patch(:,:)
real(kind=r8), public, pointer :: fabd_patch(:,:)
real(kind=r8), public, pointer :: fabd_sun_patch(:,:)
real(kind=r8), public, pointer :: fabd_sha_patch(:,:)
real(kind=r8), public, pointer :: fabi_patch(:,:)
real(kind=r8), public, pointer :: fabi_sun_patch(:,:)
real(kind=r8), public, pointer :: fabi_sha_patch(:,:)
real(kind=r8), public, pointer :: fabd_sun_z_patch(:,:)
real(kind=r8), public, pointer :: fabd_sha_z_patch(:,:)
real(kind=r8), public, pointer :: fabi_sun_z_patch(:,:)
real(kind=r8), public, pointer :: fabi_sha_z_patch(:,:)
real(kind=r8), public, pointer :: flx_absdv_col(:,:)
real(kind=r8), public, pointer :: flx_absdn_col(:,:)
real(kind=r8), public, pointer :: flx_absiv_col(:,:)
real(kind=r8), public, pointer :: flx_absin_col(:,:)
real(kind=r8), public, pointer :: fsun_z_patch(:,:)
real(kind=r8), public, pointer :: tlai_z_patch(:,:)
real(kind=r8), public, pointer :: tsai_z_patch(:,:)
integer, public, pointer :: ncan_patch(:)
integer, public, pointer :: nrad_patch(:)
real(kind=r8), public, pointer :: vcmaxcintsun_patch(:)
real(kind=r8), public, pointer :: vcmaxcintsha_patch(:)

Type-Bound Procedures

procedure, public :: Init
procedure, public :: Restart

Subroutines

public subroutine Init(this, bounds)

Arguments

Type IntentOptional Attributes Name
class(surfalb_type) :: this
type(bounds_type), intent(in) :: bounds

public subroutine InitAllocate(this, bounds)

Arguments

Type IntentOptional Attributes Name
class(surfalb_type) :: this
type(bounds_type), intent(in) :: bounds

public subroutine InitHistory(this, bounds)

Arguments

Type IntentOptional Attributes Name
class(surfalb_type) :: this
type(bounds_type), intent(in) :: bounds

public subroutine InitCold(this, bounds)

Arguments

Type IntentOptional Attributes Name
class(surfalb_type) :: this
type(bounds_type), intent(in) :: bounds

public subroutine Restart(this, bounds, ncid, flag, tlai_patch, tsai_patch)

Arguments

Type IntentOptional Attributes Name
class(surfalb_type) :: this
type(bounds_type), intent(in) :: bounds
type(file_desc_t), intent(inout) :: ncid
character(len=*), intent(in) :: flag
real(kind=r8), intent(in) :: tlai_patch(bounds%begp:)
real(kind=r8), intent(in) :: tsai_patch(bounds%begp:)