fates_restart_interface_type Derived Type

type, public :: fates_restart_interface_type

Components

Type	Visibility	Attributes		Name		Initial
type(fates_restart_variable_type),	public,	allocatable	::	rvars(:)
type(fates_io_variable_kind_type),	public		::	dim_kinds(fates_restart_num_dim_kinds)
type(fates_io_dimension_type),	public		::	dim_bounds(fates_restart_num_dimensions)
type(restart_map_type),	public,	pointer	::	restart_map(:)

Type-Bound Procedures

procedure, public :: Init

private subroutine Init(this, num_threads, fates_bounds)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(inout)			::	this
integer,	intent(in)			::	num_threads
type(fates_bounds_type),	intent(in)			::	fates_bounds

procedure, public :: SetThreadBoundsEach

private subroutine SetThreadBoundsEach(this, thread_index, thread_bounds)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(inout)			::	this
integer,	intent(in)			::	thread_index
type(fates_bounds_type),	intent(in)			::	thread_bounds

procedure, public :: assemble_restart_output_types

private subroutine assemble_restart_output_types(this)

Arguments

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

procedure, public :: initialize_restart_vars

private subroutine initialize_restart_vars(this)

Arguments

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

procedure, public :: num_restart_vars

private function num_restart_vars(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(in)			::	this

Return Value integer

procedure, public :: column_index

private function column_index(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(in)			::	this

Return Value integer

procedure, public :: cohort_index

private function cohort_index(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(in)			::	this

Return Value integer

procedure, public :: set_restart_vectors

private subroutine set_restart_vectors(this, nc, nsites, sites)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type)				::	this
integer,	intent(in)			::	nc
integer,	intent(in)			::	nsites
type(ed_site_type),	intent(inout),		target	::	sites(nsites)

procedure, public :: create_patchcohort_structure

private subroutine create_patchcohort_structure(this, nc, nsites, sites, bc_in)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(inout)			::	this
integer,	intent(in)			::	nc
integer,	intent(in)			::	nsites
type(ed_site_type),	intent(inout),		target	::	sites(nsites)
type(bc_in_type),	intent(in)			::	bc_in(nsites)

procedure, public :: get_restart_vectors

private subroutine get_restart_vectors(this, nc, nsites, sites)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(inout)			::	this
integer,	intent(in)			::	nc
integer,	intent(in)			::	nsites
type(ed_site_type),	intent(inout),		target	::	sites(nsites)

procedure, public :: update_3dpatch_radiation

private subroutine update_3dpatch_radiation(this, nsites, sites, bc_out)

Arguments

Type	Intent	Optional	Attributes		Name
class(fates_restart_interface_type),	intent(inout)			::	this
integer,	intent(in)			::	nsites
type(ed_site_type),	intent(inout),		target	::	sites(nsites)
type(bc_out_type),	intent(inout)			::	bc_out(nsites)