radiation_aerosol_optics_description Module

Uses

- PARKIND1
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Contents

Derived Types

aerosol_optics_description_type

Functions

get_index to_string

Subroutines

read preferred_optical_model

Derived Types

type, public :: aerosol_optics_description_type

Components

Type	Visibility	Attributes		Name		Initial
character(len=1),	public,	allocatable	::	code_phobic(:,:)
character(len=1),	public,	allocatable	::	code_philic(:,:)
integer,	public,	allocatable	::	bin_phobic(:)
integer,	public,	allocatable	::	bin_philic(:)
character(len=1),	public,	allocatable	::	optical_model_phobic(:,:)
character(len=1),	public,	allocatable	::	optical_model_philic(:,:)
logical,	public,	allocatable	::	is_preferred_phobic(:)
logical,	public,	allocatable	::	is_preferred_philic(:)

Type-Bound Procedures

procedure , public :: read Subroutine
procedure , public :: preferred_optical_model Subroutine
procedure , public :: get_index Function

Functions

public function get_index(this, code_str, lhydrophilic, ibin, optical_model_str)

Arguments

Type	Intent	Optional	Attributes		Name
class(aerosol_optics_description_type),	intent(in)			::	this
character(len=2),	intent(in)			::	code_str
logical,	intent(in)			::	lhydrophilic
integer,	intent(in),	optional		::	ibin
character(len=*),	intent(in),	optional		::	optical_model_str

Return Value integer

publicpure function to_string(arr) result(str)

Arguments

Type	Intent	Optional	Attributes		Name
character,	intent(in)			::	arr(:)

Return Value character(len=size)

Subroutines

public subroutine read(this, file_name, iverbose)

Arguments

Type	Intent	Optional	Attributes		Name
class(aerosol_optics_description_type),	intent(inout)			::	this
character(len=*),	intent(in)			::	file_name
integer,	intent(in),	optional		::	iverbose

public subroutine preferred_optical_model(this, code_str, optical_model_str)

Arguments

Type	Intent	Optional	Attributes		Name
class(aerosol_optics_description_type),	intent(inout)			::	this
character(len=2),	intent(in)			::	code_str
character(len=*),	intent(in)			::	optical_model_str