class_Grid Module

Uses

- assoc_list
- assoc_list

Contents

Variables

mod_name dp

Interfaces

print_type assignment(=) init delete refcount id name initialized same psml_die

Derived Types

Grid_ Grid

Functions

initialized_ same_ refcount_ id_ name_ valGrid annotationGrid sizeGrid

Subroutines

init_ delete_ assign_ tag_new_object delete_Data newGrid printGrid

Variables

Type	Visibility	Attributes		Name		Initial
character(len=*),	public,	parameter	::	mod_name	=	"Grid"
integer,	public,	parameter	::	dp	=	selected_real_kind(10, 100)

Interfaces

public interface print_type

private subroutine printGrid(this)

Arguments

Type Intent Optional Attributes Name

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

public interface assignment(=)

private subroutine assign_(this, other)

Arguments

Type Intent Optional Attributes Name

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

type(Grid), intent(in) :: other

public interface init

private subroutine init_(this)

Arguments

Type Intent Optional Attributes Name

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

public interface delete

private subroutine delete_(this)

Arguments

Type Intent Optional Attributes Name

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

public interface refcount

private function refcount_(this) result(count)

Arguments

Type Intent Optional Attributes Name

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

Return Value integer

public interface id

private function id_(this) result(str)

Arguments

Type Intent Optional Attributes Name

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

Return Value character(len=36)

public interface name

private function name_(this) result(str)

Arguments

Type Intent Optional Attributes Name

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

Return Value character(len=len_trim(this%data%name))

public interface initialized

private pure function initialized_(this) result(init)

Arguments

Type Intent Optional Attributes Name

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

Return Value logical

public interface same

private pure function same_(this1, this2) result(same)

Arguments

Type Intent Optional Attributes Name

type(Grid), intent(in) :: this1

type(Grid), intent(in) :: this2

Return Value logical

interface

private subroutine psml_die(str)

Arguments

Type Intent Optional Attributes Name

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

Derived Types

type, public :: Grid_

Components

Type	Visibility	Attributes		Name		Initial
integer,	public		::	refCount	=	0
character(len=36),	public		::	id	=	"null_id"
character(len=256),	public		::	name	=	"null Grid"
integer,	public		::	npts	=	0
real(kind=dp),	public,	pointer	::	grid_data(:)	=>	null()
type(ps_annotation_t),	public		::	annotation

type, public :: Grid

Components

Type	Visibility	Attributes		Name		Initial
type(Grid_),	public,	pointer	::	data	=>	null()

Functions

private pure function initialized_(this) result(init)

Arguments

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

Return Value logical

private pure function same_(this1, this2) result(same)

Arguments

Type	Intent	Optional	Attributes		Name
type(Grid),	intent(in)			::	this1
type(Grid),	intent(in)			::	this2

Return Value logical

private function refcount_(this) result(count)

Arguments

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

Return Value integer

private function id_(this) result(str)

Arguments

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

Return Value character(len=36)

private function name_(this) result(str)

Arguments

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

Return Value character(len=len_trim(this%data%name))

public function valGrid(this) result(p)

Arguments

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

Return Value real(kind=dp), pointer, (:)

public function annotationGrid(this) result(p)

Arguments

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

Return Value type(ps_annotation_t), pointer

public function sizeGrid(this) result(n)

Arguments

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

Return Value integer

Subroutines

private subroutine init_(this)

Arguments

Type	Intent	Optional	Attributes		Name
type(Grid),	intent(inout)			::	this

private subroutine delete_(this)

Arguments

Type	Intent	Optional	Attributes		Name
type(Grid),	intent(inout)			::	this

private subroutine assign_(this, other)

Arguments

Type	Intent	Optional	Attributes		Name
type(Grid),	intent(inout)			::	this
type(Grid),	intent(in)			::	other

private subroutine tag_new_object(this)

Arguments

Type	Intent	Optional	Attributes		Name
type(Grid),	intent(inout)			::	this

private subroutine delete_Data(gd)

Arguments

Type	Intent	Optional	Attributes		Name
type(Grid_)				::	gd

public subroutine newGrid(this, n, name)

Arguments

Type	Intent	Optional	Attributes		Name
type(Grid),	intent(inout)			::	this
integer,	intent(in)			::	n
character(len=*),	intent(in),	optional		::	name

private subroutine printGrid(this)

Arguments

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