dictionary – fdict

A key-value dictionary module to contain any data in fortran.

This module implements a generic dictionary-type (type(dictionary_t)) which may contain any data-type using the variable_t data-type defined in variable.

Example:

 real :: r
 real :: ra(10)
 real, target :: rb(10)
 type(dictionary_t) :: dict
 dict = ('Value'.kv.r)

Uses

- iso_c_binding
- variable
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. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public,	parameter	::	DICTIONARY_KEY_LENGTH	=	48	Maximum character length of the keys in the dictionary, no index/key can be longer than this.
character(len=DICTIONARY_KEY_LENGTH),	public,	parameter	::	DICTIONARY_NOT_FOUND	=	'ERROR: key not found'

Interfaces

public interface len

Return the length of a dictionary, by internal counting algorithms

private pure function len_(d)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(in) :: d

Return Value integer

Type	Intent	Optional	Attributes		Name
type(dictionary_t),	intent(in)			::	d

public interface llen

Actually count number of elements in the dictionary by forcing the traversing

private function llen_(this)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(inout) :: this

Return Value integer

public interface print

Print out all keys and which data-type it contains as well as the hash-number

private subroutine print_(d)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(in) :: d

Type	Intent	Optional	Attributes		Name
type(dictionary_t),	intent(in)			::	d

public interface operator( // )

Concatenate, or extend, dictionaries, this can be done on it-self `dic = dic // ('key'.kv.1)

private function d_cat_d(d1, d2) result(d)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(in) :: d1

type(dictionary_t), intent(in) :: d2

Return Value type(dictionary_t)

Type	Intent	Optional	Attributes		Name
type(dictionary_t),	intent(in)			::	d1
type(dictionary_t),	intent(in)			::	d2

public interface hash_coll

private function hash_coll_(this, max) result(col)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(inout) :: this

logical, intent(in), optional :: max

Return Value integer

public interface delete

private subroutine delete_(this, key, dealloc)

Arguments

Type	Intent	Optional		Name
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in),	optional	::	key
logical,	intent(in),	optional	::	dealloc

public interface pop

private subroutine pop_(val, this, key, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(in),	optional	::	dealloc

public interface copy

private subroutine copy_(from, to)

Generate the copy routine

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(in) :: from

type(dictionary_t), intent(inout) :: to

Type	Intent	Optional	Attributes		Name
type(dictionary_t),	intent(in)			::	from
type(dictionary_t),	intent(inout)			::	to

public interface nullify

private elemental subroutine nullify_(this)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(inout) :: this
private elemental subroutine nullify_key_(this, key)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(inout) :: this

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

public interface extend

private subroutine sub_d_cat_d(d, d2)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(inout) :: d

type(dictionary_t), intent(in) :: d2

Type	Intent	Optional	Attributes		Name
type(dictionary_t),	intent(inout)			::	d
type(dictionary_t),	intent(in)			::	d2

public interface which

private function d_key_which(this, key) result(t)

Arguments

Type Intent Optional Attributes Name

type(dictionary_t), intent(in) :: this

character(len=*), intent(in), optional :: key

Return Value character(len=VARIABLE_TYPE_LENGTH)

Type	Intent	Optional	Attributes		Name
type(dictionary_t),	intent(in)			::	this
character(len=*),	intent(in),	optional		::	key

public interface operator(.KV.)

private function d_kv_a0_0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

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

Return Value type(dictionary_t)
private function d_kv_var(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(variable_t), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_a1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

character(len=1), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_s0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_s1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_s2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)
private function d_kv_s3(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), intent(in), dimension(:,:,:) :: val

Return Value type(dictionary_t)
private function d_kv_d0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_d1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_d2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)
private function d_kv_d3(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), intent(in), dimension(:,:,:) :: val

Return Value type(dictionary_t)
private function d_kv_c0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_c1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_c2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)

private function d_kv_c3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=sp),	intent(in),		dimension(:,:,:)	::	val

Return Value type(dictionary_t)

private function d_kv_z0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_z1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_z2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)

private function d_kv_z3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=dp),	intent(in),		dimension(:,:,:)	::	val

Return Value type(dictionary_t)

private function d_kv_b0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_b1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_b2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)
private function d_kv_b3(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), dimension(:,:,:) :: val

Return Value type(dictionary_t)
private function d_kv_h0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_h1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_h2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)

private function d_kv_h3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=ih),	intent(in),		dimension(:,:,:)	::	val

Return Value type(dictionary_t)

private function d_kv_i0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_i1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_i2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)

private function d_kv_i3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=is),	intent(in),		dimension(:,:,:)	::	val

Return Value type(dictionary_t)

private function d_kv_l0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_l1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_l2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), intent(in), dimension(:,:) :: val

Return Value type(dictionary_t)

private function d_kv_l3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=il),	intent(in),		dimension(:,:,:)	::	val

Return Value type(dictionary_t)

private function d_kv_cp0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(c_ptr), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_cp1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(c_ptr), intent(in), dimension(:) :: val

Return Value type(dictionary_t)
private function d_kv_fp0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(c_funptr), intent(in) :: val

Return Value type(dictionary_t)
private function d_kv_fp1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(c_funptr), intent(in), dimension(:) :: val

Return Value type(dictionary_t)

public interface operator(.KVP.)

private function d_kvp_var(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(variable_t), intent(in) :: val

Return Value type(dictionary_t)
private function d_kvp_dict(key, dic) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(dictionary_t), intent(in) :: dic

Return Value type(dictionary_t)

private function d_kvp_a1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
character(len=1),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_s0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_s1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
real(kind=sp),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_s2(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
real(kind=sp),	intent(in),		dimension(:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_s3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
real(kind=sp),	intent(in),		dimension(:,:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_d0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_d1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
real(kind=dp),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_d2(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
real(kind=dp),	intent(in),		dimension(:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_d3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
real(kind=dp),	intent(in),		dimension(:,:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_c0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_c1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=sp),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_c2(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=sp),	intent(in),		dimension(:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_c3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=sp),	intent(in),		dimension(:,:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_z0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_z1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=dp),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_z2(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=dp),	intent(in),		dimension(:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_z3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
complex(kind=dp),	intent(in),		dimension(:,:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_b0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), target :: val

Return Value type(dictionary_t)
private function d_kvp_b1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), dimension(:), target :: val

Return Value type(dictionary_t)
private function d_kvp_b2(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), dimension(:,:), target :: val

Return Value type(dictionary_t)
private function d_kvp_b3(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), dimension(:,:,:), target :: val

Return Value type(dictionary_t)
private function d_kvp_h0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_h1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=ih),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_h2(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=ih),	intent(in),		dimension(:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_h3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=ih),	intent(in),		dimension(:,:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_i0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_i1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=is),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_i2(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=is),	intent(in),		dimension(:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_i3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=is),	intent(in),		dimension(:,:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_l0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_l1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=il),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_l2(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=il),	intent(in),		dimension(:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_l3(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
integer(kind=il),	intent(in),		dimension(:,:,:), target	::	val

Return Value type(dictionary_t)

private function d_kvp_cp0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(c_ptr), intent(in), target :: val

Return Value type(dictionary_t)
private function d_kvp_cp1(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(c_ptr), intent(in), dimension(:), target :: val

Return Value type(dictionary_t)
private function d_kvp_fp0(key, val) result(this)

Arguments

Type Intent Optional Attributes Name

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

type(c_funptr), intent(in), target :: val

Return Value type(dictionary_t)

private function d_kvp_fp1(key, val) result(this)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	key
type(c_funptr),	intent(in),		dimension(:), target	::	val

Return Value type(dictionary_t)

public interface assign

private subroutine d_get_val(val, d, key, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	val
type(dictionary_t),	intent(inout)		::	d
character(len=*),	intent(in),	optional	::	key
logical,	intent(in),	optional	::	dealloc

private subroutine d_get_val_a_(val, d, key, dealloc)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	d
character(len=*),	intent(in),	optional	::	key
logical,	intent(in),	optional	::	dealloc

private subroutine d_get_val_a1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_a1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_s0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
real(kind=sp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_s0(val, this, success)

Arguments

Type	Intent	Optional		Name
real(kind=sp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_s1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_s1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_s2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_s2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_s3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_s3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_d0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
real(kind=dp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_d0(val, this, success)

Arguments

Type	Intent	Optional		Name
real(kind=dp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_d1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_d1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_d2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_d2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_d3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_d3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_c0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
complex(kind=sp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_c0(val, this, success)

Arguments

Type	Intent	Optional		Name
complex(kind=sp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_c1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_c1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_c2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_c2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_c3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_c3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_z0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
complex(kind=dp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_z0(val, this, success)

Arguments

Type	Intent	Optional		Name
complex(kind=dp),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_z1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_z1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_z2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_z2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_z3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_z3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_b0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
logical,	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_b0(val, this, success)

Arguments

Type	Intent	Optional		Name
logical,	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_b1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_b1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_b2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_b2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_b3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_b3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_h0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
integer(kind=ih),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_h0(val, this, success)

Arguments

Type	Intent	Optional		Name
integer(kind=ih),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_h1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_h1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_h2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_h2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_h3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_h3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_i0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
integer(kind=is),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_i0(val, this, success)

Arguments

Type	Intent	Optional		Name
integer(kind=is),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_i1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_i1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_i2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_i2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_i3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_i3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_l0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
integer(kind=il),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_l0(val, this, success)

Arguments

Type	Intent	Optional		Name
integer(kind=il),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_l1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_l1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_l2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_l2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_l3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_l3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_cp0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
type(c_ptr),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_cp0(val, this, success)

Arguments

Type	Intent	Optional		Name
type(c_ptr),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_cp1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_cp1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_val_fp0(val, this, key, success)

Arguments

Type	Intent	Optional		Name
type(c_funptr),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
character(len=*),	intent(in)		::	key
logical,	intent(out),	optional	::	success

private subroutine d_get_val_first_fp0(val, this, success)

Arguments

Type	Intent	Optional		Name
type(c_funptr),	intent(out)		::	val
type(dictionary_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine d_get_val_fp1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_val_first_fp1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),	intent(out),		dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

public interface associate

private subroutine d_get_p_val(val, d, key, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	val
type(dictionary_t),	intent(inout)		::	d
character(len=*),	intent(in),	optional	::	key
logical,	intent(in),	optional	::	dealloc

private subroutine d_get_p_dict(dic, d, key, dealloc)

Arguments

Type	Intent	Optional		Name
type(dictionary_t),	intent(inout)		::	dic
type(dictionary_t),	intent(inout)		::	d
character(len=*),	intent(in),	optional	::	key
logical,	intent(in),	optional	::	dealloc

private subroutine d_get_p_a1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_a1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_s0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_s0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_s1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_s1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_s2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_s2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_s3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_s3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_d0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_d0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_d1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_d1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_d2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_d2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_d3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_d3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_c0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_c0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_c1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_c1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_c2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_c2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_c3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_c3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_z0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_z0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_z1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_z1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_z2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_z2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_z3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_z3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_b0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_b0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_b1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_b1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_b2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_b2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_b3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_b3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_h0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_h0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_h1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_h1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_h2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_h2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_h3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_h3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_i0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_i0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_i1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_i1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_i2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_i2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_i3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_i3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_l0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_l0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_l1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_l1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_l2(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_l2(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_l3(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_l3(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:,:,:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_cp0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_cp0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_cp1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_cp1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_fp0(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_fp0(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),			pointer	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

private subroutine d_get_p_fp1(val, this, key, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
character(len=*),	intent(in)			::	key
logical,	intent(out),	optional		::	success

private subroutine d_get_p_first_fp1(val, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),			pointer, dimension(:)	::	val
type(dictionary_t),	intent(inout)			::	this
logical,	intent(out),	optional		::	success

Derived Types

type, public :: dictionary_t

The dictionary container it-self

Components

Type	Visibility	Attributes		Name		Initial
type(dictionary_entry_),	public,	pointer	::	first	=>	null()
integer,	public		::	len	=	0

dictionary Module

Contents

Variables

Interfaces

Derived Types

Uses

Contents

Variables

Interfaces

Derived Types

Variables

Interfaces

public interface len

private pure function len_(d)

Arguments

Return Value integer

public interface llen

private function llen_(this)

Arguments

Return Value integer

public interface print

private subroutine print_(d)

Arguments

public interface operator( // )

private function d_cat_d(d1, d2) result(d)

Arguments

Return Value type(dictionary_t)

public interface hash_coll

private function hash_coll_(this, max) result(col)

Arguments

Return Value integer

public interface delete

private subroutine delete_(this, key, dealloc)

Arguments

public interface pop

private subroutine pop_(val, this, key, dealloc)

Arguments

public interface copy

private subroutine copy_(from, to)

Arguments

public interface nullify

private elemental subroutine nullify_(this)

Arguments

private elemental subroutine nullify_key_(this, key)

Arguments

public interface extend

private subroutine sub_d_cat_d(d, d2)

Arguments

public interface which

private function d_key_which(this, key) result(t)

Arguments

Return Value character(len=VARIABLE_TYPE_LENGTH)

public interface operator(.KV.)

private function d_kv_a0_0(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_var(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_a1(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_s0(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_s1(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_s2(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_s3(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_d0(key, val) result(this)

Arguments

Return Value type(dictionary_t)

private function d_kv_d1(key, val) result(this)

Arguments

Return Value type(dictionary_t)