glc2lnd_type Derived Type

type, public :: glc2lnd_type

Components

Type	Visibility	Attributes		Name		Initial
real(kind=r8),	public,	pointer	::	glc_dyn_runoff_routing_grc(:)	=>	null()

Type-Bound Procedures

procedure, public :: Init

private subroutine Init(this, bounds, glc_behavior)

Arguments

Type	Intent	Optional	Attributes		Name
class(glc2lnd_type)				::	this
type(bounds_type),	intent(in)			::	bounds
type(glc_behavior_type),	intent(in),		target	::	glc_behavior

procedure, public :: Clean

private subroutine Clean(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(glc2lnd_type),	intent(inout)			::	this

procedure, public :: set_glc2lnd_fields

private subroutine set_glc2lnd_fields(this, bounds, glc_present, x2l, index_x2l_Sg_ice_covered, index_x2l_Sg_topo, index_x2l_Flgg_hflx, index_x2l_Sg_icemask, index_x2l_Sg_icemask_coupled_fluxes)

Arguments

Type	Intent	Optional	Attributes		Name
class(glc2lnd_type),	intent(inout)			::	this
type(bounds_type),	intent(in)			::	bounds
logical,	intent(in)			::	glc_present
real(kind=r8),	intent(in)			::	x2l(:,bounds%begg:)
integer,	intent(in)			::	index_x2l_Sg_ice_covered(0:)
integer,	intent(in)			::	index_x2l_Sg_topo(0:)
integer,	intent(in)			::	index_x2l_Flgg_hflx(0:)
integer,	intent(in)			::	index_x2l_Sg_icemask
integer,	intent(in)			::	index_x2l_Sg_icemask_coupled_fluxes

procedure, public :: update_glc2lnd_fracs

private subroutine update_glc2lnd_fracs(this, bounds)

Arguments

Type	Intent	Optional	Attributes		Name
class(glc2lnd_type),	intent(in)			::	this
type(bounds_type),	intent(in)			::	bounds

procedure, public :: update_glc2lnd_topo

private subroutine update_glc2lnd_topo(this, bounds, topo_col, needs_downscaling_col)

Arguments

Type	Intent	Optional	Attributes		Name
class(glc2lnd_type),	intent(in)			::	this
type(bounds_type),	intent(in)			::	bounds
real(kind=r8),	intent(inout)			::	topo_col(bounds%begc:)
logical,	intent(inout)			::	needs_downscaling_col(bounds%begc:)

procedure, public :: for_test_set_glc2lnd_fields_directly

private subroutine for_test_set_glc2lnd_fields_directly(this, bounds, topo, icemask)

Arguments

Type	Intent	Optional	Attributes		Name
class(glc2lnd_type),	intent(inout)			::	this
type(bounds_type),	intent(in)			::	bounds
real(kind=r8),	intent(in),	optional		::	topo(bounds%begg:,0:)
real(kind=r8),	intent(in),	optional		::	icemask(bounds%begg:)