type_scalar_setting Derived Type

type, private, abstract, extends(type_value) :: type_scalar_setting

Inherits

Inherited by

Contents

Variables

long_name description backing_store_node path parent units has_default

Type-Bound Procedures

write_schema get_yaml_style create_child as_string write_yaml get_comment get_maximum_depth

Components

Type	Visibility	Attributes		Name		Initial
character(len=:),	public,	allocatable	::	long_name
character(len=:),	public,	allocatable	::	description
class(type_yaml_node),	public,	pointer	::	backing_store_node	=>	null()
character(len=:),	public,	allocatable	::	path
class(type_value),	public,	pointer	::	parent	=>	null()
character(len=:),	public,	allocatable	::	units
logical,	public		::	has_default	=	.false.

Type-Bound Procedures

procedure, public :: write_schema => value_write_schema

private recursive subroutine value_write_schema(self, unit, name, indent)

Arguments

Type	Intent	Optional	Attributes		Name
class(type_value),	intent(in)			::	self
integer,	intent(in)			::	unit
character(len=*),	intent(in)			::	name
integer,	intent(in)			::	indent

procedure, public :: get_yaml_style => value_get_yaml_style

private function value_get_yaml_style(self)

Arguments

Type Intent Optional Attributes Name

class(type_value), intent(in) :: self

Return Value integer

procedure, public :: create_child

private recursive function create_child(self) result(child)

Arguments

Type Intent Optional Attributes Name

class(type_value), intent(in) :: self

Return Value class(type_settings), pointer

procedure(setting_as_string), public, deferred :: as_string

function setting_as_string(self, use_default) result(string) Prototype

Arguments

Type Intent Optional Attributes Name

class(type_scalar_setting), intent(in) :: self

logical, intent(in) :: use_default

Return Value character(len=:), allocatable

procedure, public :: write_yaml => setting_write_yaml

private recursive subroutine setting_write_yaml(self, unit, indent, comment_depth, header)

Arguments

Type	Intent	Optional	Attributes		Name
class(type_scalar_setting),	intent(in)			::	self
integer,	intent(in)			::	unit
integer,	intent(in)			::	indent
integer,	intent(in)			::	comment_depth
logical,	intent(in)			::	header

procedure, public :: get_comment => setting_get_comment

private recursive subroutine setting_get_comment(self, comment)

Arguments

Type	Intent	Optional	Attributes		Name
class(type_scalar_setting),	intent(in)			::	self
character(len=:),	intent(inout),		allocatable	::	comment

procedure, public :: get_maximum_depth => setting_get_maximum_depth

private recursive function setting_get_maximum_depth(self, name) result(maxdepth)

Arguments

Type Intent Optional Attributes Name

class(type_scalar_setting), intent(in) :: self

character(len=*), intent(in) :: name

Return Value integer