variable – fdict

A type-free variable module to contain any data in fortran.

This module implements a generic variable-type (type(variable_t)) which may contain any data-type (even user-derived type constructs).

Its basic usage is somewhat different than the regular assignment in fortran.

Example:

 real :: r
 real :: ra(10)
 real, target :: rb(10)
 type(variable_t) :: v
 call assign(v, r) ! v now contains value of r
 call assign(v, ra) ! v now contains array with values of ra
 call delete(v) ! delete content
 call associate(v, ra) ! v now contains a pointer to rb
 call assign(ra, v) ! copies data from rb to ra

The assignment routine behaves like = (delete old value) whereas the associate routine behaves like => (nullify old value).

The data-types allowed in this type is not limited by this module, but we currently allow integers, reals, complex and C-pointers.

Uses

- iso_c_binding
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.

Used by

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

VARIABLE_TYPE_LENGTH

Interfaces

which delete nullify print associate_type enc size_enc cpack cunpack assign associate associatd

Derived Types

variable_t

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public,	parameter	::	VARIABLE_TYPE_LENGTH	=	4	Maximum character length of the type specifier in the variable, no unique identifier may be longer than this.

Interfaces

public interface which

Type of content stored in the variable (character(len=VARIABLE_TYPE_LENGTH))

private elemental function which_(this) result(t)

Arguments

Type Intent Optional Attributes Name

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

Return Value character(len=VARIABLE_TYPE_LENGTH)

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(in)			::	this

public interface delete

Delete the variable (equivalent to deallocate(<>)).

private subroutine delete_(this, dealloc)

Arguments

Type Intent Optional Attributes Name

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

logical, intent(in), optional :: dealloc

public interface nullify

Nullify the variable (equivalent to nullify(<>)).

private elemental subroutine nullify_(this)

Arguments

Type Intent Optional Attributes Name

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

public interface print

Print (to std-out) information regarding the variable, i.e. the type.

private subroutine print_(this)

Arguments

Type Intent Optional Attributes Name

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

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(in)			::	this

public interface associate_type

private subroutine associate_type_(this, enc, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
character(len=1),	intent(in)		::	enc(:)
logical,	intent(in),	optional	::	dealloc

public interface enc

The encoding of the stored pointer (character, dimension(:))

private subroutine enc_(this, enc)

Arguments

Type Intent Optional Attributes Name

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

character(len=1), intent(out) :: enc(:)

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(in)			::	this
character(len=1),	intent(out)			::	enc(:)

public interface size_enc

The size of the encoding character array (size(enc(<>)))

private function size_enc_(this) result(len)

Arguments

Type Intent Optional Attributes Name

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

Return Value integer

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(in)			::	this

public interface cpack

Convert a character(len=*) to character, dimension(:)

private function cpack_(c) result(car)

Arguments

Type Intent Optional Attributes Name

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

Return Value character(len=1) (len(c))

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	c

public interface cunpack

Convert a character(len=1), dimensions(:) to character(len=*)

private function cunpack_(car) result(c)

Arguments

Type Intent Optional Attributes Name

character(len=1), intent(in) :: car(:)

Return Value character(len=size(car))

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	car(:)

public interface assign

private subroutine assign_get_a0_0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
character(len=*),	intent(out)		::	lhs
type(variable_t),	intent(inout)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_a0_0(this, rhs, dealloc)

Arguments

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

private subroutine assign_var(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
type(variable_t),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_a1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_a1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
character(len=1),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_s0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
real(kind=sp),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_s0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
real(kind=sp),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_s1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_s1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=sp),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_s2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_s2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=sp),	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_s3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_s3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=sp),	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_d0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
real(kind=dp),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_d0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
real(kind=dp),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_d1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_d1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=dp),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_d2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_d2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=dp),	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_d3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_d3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=dp),	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_c0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
complex(kind=sp),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_c0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
complex(kind=sp),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_c1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_c1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=sp),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_c2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_c2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=sp),	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_c3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_c3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=sp),	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_z0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
complex(kind=dp),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_z0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
complex(kind=dp),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_z1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_z1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=dp),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_z2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_z2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=dp),	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_z3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_z3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=dp),	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_b0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
logical,	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_b0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
logical,	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_b1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_b1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
logical,	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_b2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_b2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
logical,	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_b3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_b3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
logical,	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_h0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
integer(kind=ih),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_h0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
integer(kind=ih),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_h1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_h1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=ih),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_h2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_h2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=ih),	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_h3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_h3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=ih),	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_i0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
integer(kind=is),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_i0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
integer(kind=is),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_i1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_i1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=is),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_i2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_i2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=is),	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_i3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_i3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=is),	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_l0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
integer(kind=il),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_l0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
integer(kind=il),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_l1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_l1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=il),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_l2(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_l2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=il),	intent(in),		dimension(:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_l3(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),	intent(out),		dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_l3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=il),	intent(in),		dimension(:,:,:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_cp0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
type(c_ptr),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_cp0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
type(c_ptr),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_cp1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_cp1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
type(c_ptr),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine assign_get_fp0(lhs, this, success)

Arguments

Type	Intent	Optional		Name
type(c_funptr),	intent(out)		::	lhs
type(variable_t),	intent(in)		::	this
logical,	intent(out),	optional	::	success

private subroutine assign_set_fp0(this, rhs, dealloc)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
type(c_funptr),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc

private subroutine assign_get_fp1(lhs, this, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),	intent(out),		dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(out),	optional		::	success

private subroutine assign_set_fp1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
type(c_funptr),	intent(in),		dimension(:)	::	rhs
logical,	intent(in),	optional		::	dealloc

public interface associate

private subroutine associate_var(this, rhs, dealloc, success)

Arguments

Type	Intent	Optional		Name
type(variable_t),	intent(inout)		::	this
type(variable_t),	intent(in)		::	rhs
logical,	intent(in),	optional	::	dealloc
logical,	intent(out),	optional	::	success

private subroutine associate_get_a1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_a1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
character(len=1),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_s0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_s0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=sp),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_s1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_s1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=sp),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_s2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_s2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=sp),	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_s3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=sp),			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_s3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=sp),	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_d0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_d0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=dp),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_d1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_d1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=dp),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_d2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_d2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=dp),	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_d3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_d3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
real(kind=dp),	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_c0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_c0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=sp),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_c1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_c1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=sp),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_c2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_c2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=sp),	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_c3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=sp),			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_c3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=sp),	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_z0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_z0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=dp),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_z1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_z1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=dp),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_z2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_z2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=dp),	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_z3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
complex(kind=dp),			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_z3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
complex(kind=dp),	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_b0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_b0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
logical,	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_b1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_b1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
logical,	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_b2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_b2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
logical,	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_b3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
logical,			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_b3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
logical,	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_h0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_h0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=ih),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_h1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_h1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=ih),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_h2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_h2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=ih),	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_h3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=ih),			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_h3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=ih),	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_i0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_i0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=is),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_i1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_i1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=is),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_i2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_i2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=is),	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_i3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=is),			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_i3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=is),	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_l0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_l0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=il),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_l1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_l1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=il),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_l2(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_l2(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=il),	intent(in),		dimension(:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_l3(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=il),			pointer, dimension(:,:,:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_l3(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
integer(kind=il),	intent(in),		dimension(:,:,:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_cp0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_cp0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
type(c_ptr),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_cp1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_ptr),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_cp1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
type(c_ptr),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_fp0(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),			pointer	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_fp0(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
type(c_funptr),	intent(in),		target	::	rhs
logical,	intent(in),	optional		::	dealloc

private subroutine associate_get_fp1(lhs, this, dealloc, success)

Arguments

Type	Intent	Optional	Attributes		Name
type(c_funptr),			pointer, dimension(:)	::	lhs
type(variable_t),	intent(in)			::	this
logical,	intent(in),	optional		::	dealloc
logical,	intent(out),	optional		::	success

private subroutine associate_set_fp1(this, rhs, dealloc)

Arguments

Type	Intent	Optional	Attributes		Name
type(variable_t),	intent(inout)			::	this
type(c_funptr),	intent(in),		dimension(:), target	::	rhs
logical,	intent(in),	optional		::	dealloc

public interface associatd

private pure function associatd_l_a1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

character(len=1), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_a1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

character(len=1), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_s0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=sp), pointer :: lhs

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

Return Value logical
private pure function associatd_r_s0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), pointer :: rhs

Return Value logical
private pure function associatd_l_s1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=sp), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_s1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_s2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=sp), pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_s2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_s3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=sp), pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_s3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=sp), pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_d0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=dp), pointer :: lhs

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

Return Value logical
private pure function associatd_r_d0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), pointer :: rhs

Return Value logical
private pure function associatd_l_d1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=dp), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_d1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_d2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=dp), pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_d2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_d3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

real(kind=dp), pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_d3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

real(kind=dp), pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_c0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=sp), pointer :: lhs

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

Return Value logical
private pure function associatd_r_c0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), pointer :: rhs

Return Value logical
private pure function associatd_l_c1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=sp), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_c1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_c2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=sp), pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_c2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_c3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=sp), pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_c3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=sp), pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_z0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=dp), pointer :: lhs

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

Return Value logical
private pure function associatd_r_z0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), pointer :: rhs

Return Value logical
private pure function associatd_l_z1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=dp), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_z1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_z2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=dp), pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_z2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_z3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

complex(kind=dp), pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_z3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

complex(kind=dp), pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_b0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

logical, pointer :: lhs

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

Return Value logical
private pure function associatd_r_b0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

logical, pointer :: rhs

Return Value logical
private pure function associatd_l_b1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

logical, pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_b1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

logical, pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_b2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

logical, pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_b2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

logical, pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_b3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

logical, pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_b3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

logical, pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_h0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=ih), pointer :: lhs

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

Return Value logical
private pure function associatd_r_h0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), pointer :: rhs

Return Value logical
private pure function associatd_l_h1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=ih), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_h1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_h2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=ih), pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_h2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_h3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=ih), pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_h3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=ih), pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_i0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=is), pointer :: lhs

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

Return Value logical
private pure function associatd_r_i0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), pointer :: rhs

Return Value logical
private pure function associatd_l_i1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=is), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_i1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_i2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=is), pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_i2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_i3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=is), pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_i3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=is), pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_l0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=il), pointer :: lhs

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

Return Value logical
private pure function associatd_r_l0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), pointer :: rhs

Return Value logical
private pure function associatd_l_l1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=il), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_l1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_l2(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=il), pointer, dimension(:,:) :: lhs

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

Return Value logical
private pure function associatd_r_l2(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), pointer, dimension(:,:) :: rhs

Return Value logical
private pure function associatd_l_l3(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

integer(kind=il), pointer, dimension(:,:,:) :: lhs

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

Return Value logical
private pure function associatd_r_l3(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

integer(kind=il), pointer, dimension(:,:,:) :: rhs

Return Value logical
private pure function associatd_l_cp0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

type(c_ptr), pointer :: lhs

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

Return Value logical
private pure function associatd_r_cp0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

type(c_ptr), pointer :: rhs

Return Value logical
private pure function associatd_l_cp1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

type(c_ptr), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_cp1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

type(c_ptr), pointer, dimension(:) :: rhs

Return Value logical
private pure function associatd_l_fp0(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

type(c_funptr), pointer :: lhs

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

Return Value logical
private pure function associatd_r_fp0(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

type(c_funptr), pointer :: rhs

Return Value logical
private pure function associatd_l_fp1(lhs, this) result(ret)

Arguments

Type Intent Optional Attributes Name

type(c_funptr), pointer, dimension(:) :: lhs

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

Return Value logical
private pure function associatd_r_fp1(this, rhs) result(ret)

Arguments

Type Intent Optional Attributes Name

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

type(c_funptr), pointer, dimension(:) :: rhs

Return Value logical

Derived Types

type, public :: variable_t

Container for any fortran data-type, intrinsically handles all from fortran and any external type may be added via external routines.

Components

Type	Visibility	Attributes		Name		Initial
character(len=VARIABLE_TYPE_LENGTH),	public		::	t	=	' '
character(len=1),	public,	dimension(:), allocatable	::	enc

variable Module

Contents

Variables

Interfaces

Derived Types

Uses

Used by

Contents

Variables

Interfaces

Derived Types

Variables

Interfaces

public interface which

private elemental function which_(this) result(t)

Arguments

Return Value character(len=VARIABLE_TYPE_LENGTH)

public interface delete

private subroutine delete_(this, dealloc)

Arguments

public interface nullify

private elemental subroutine nullify_(this)

Arguments

public interface print

private subroutine print_(this)

Arguments

public interface associate_type

private subroutine associate_type_(this, enc, dealloc)

Arguments

public interface enc

private subroutine enc_(this, enc)

Arguments

public interface size_enc

private function size_enc_(this) result(len)

Arguments

Return Value integer

public interface cpack

private function cpack_(c) result(car)

Arguments

Return Value character(len=1) (len(c))

public interface cunpack

private function cunpack_(car) result(c)

Arguments

Return Value character(len=size(car))

public interface assign

private subroutine assign_get_a0_0(lhs, this, success)

Arguments

private subroutine assign_set_a0_0(this, rhs, dealloc)

Arguments

private subroutine assign_var(this, rhs, dealloc)

Arguments

private subroutine assign_get_a1(lhs, this, success)

Arguments

private subroutine assign_set_a1(this, rhs, dealloc)

Arguments

private subroutine assign_get_s0(lhs, this, success)

Arguments

private subroutine assign_set_s0(this, rhs, dealloc)

Arguments

private subroutine assign_get_s1(lhs, this, success)

Arguments

private subroutine assign_set_s1(this, rhs, dealloc)

Arguments

private subroutine assign_get_s2(lhs, this, success)

Arguments

private subroutine assign_set_s2(this, rhs, dealloc)

Arguments

private subroutine assign_get_s3(lhs, this, success)

Arguments

private subroutine assign_set_s3(this, rhs, dealloc)

Arguments

private subroutine assign_get_d0(lhs, this, success)

Arguments

private subroutine assign_set_d0(this, rhs, dealloc)

Arguments

private subroutine assign_get_d1(lhs, this, success)

Arguments

private subroutine assign_set_d1(this, rhs, dealloc)

Arguments

private subroutine assign_get_d2(lhs, this, success)