ECTRANS_FIELD_VIEW_INTERNAL_UTIL_MOD Module

Uses

- ECTRANS_FIELD_VIEW_MOD
- PARKIND1
- ABORT_TRANS_MOD
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.

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.

Interfaces

public interface GET_NFLD

private function GET_NFLD_1(LIST) result(NFLD)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST(:)

Return Value integer(kind=JPIM)

private function GET_NFLD_3(LIST1, LIST2, LIST3) result(NFLD)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST1(:)
type(FIELD_VIEW),	intent(in)			::	LIST2(:)
type(FIELD_VIEW),	intent(in)			::	LIST3(:)

Return Value integer(kind=JPIM)

public interface GET_NPROMA

private function GET_NPROMA_1(LIST) result(NPROMA)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST(:)

Return Value integer(kind=JPIM)

private function GET_NPROMA_2(LIST1, LIST2) result(NPROMA)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST1(:)
type(FIELD_VIEW),	intent(in)			::	LIST2(:)

Return Value integer(kind=JPIM)

private function GET_NPROMA_3(LIST1, LIST2, LIST3) result(NPROMA)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST1(:)
type(FIELD_VIEW),	intent(in)			::	LIST2(:)
type(FIELD_VIEW),	intent(in)			::	LIST3(:)

Return Value integer(kind=JPIM)

public interface GET_NBLK

private function GET_NBLK_1(LIST) result(NBLK)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST(:)

Return Value integer(kind=JPIM)

private function GET_NBLK_2(LIST1, LIST2) result(NBLK)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST1(:)
type(FIELD_VIEW),	intent(in)			::	LIST2(:)

Return Value integer(kind=JPIM)

private function GET_NBLK_3(LIST1, LIST2, LIST3) result(NBLK)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST1(:)
type(FIELD_VIEW),	intent(in)			::	LIST2(:)
type(FIELD_VIEW),	intent(in)			::	LIST3(:)

Return Value integer(kind=JPIM)

public interface GET_NSPEC2

private function GET_NSPEC2_1(LIST) result(NSPEC2)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST(:)

Return Value integer(kind=JPIM)

private function GET_NSPEC2_2(LIST1, LIST2) result(NSPEC2)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST1(:)
type(FIELD_VIEW),	intent(in)			::	LIST2(:)

Return Value integer(kind=JPIM)

private function GET_NSPEC2_3(LIST1, LIST2, LIST3) result(NSPEC2)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in)			::	LIST1(:)
type(FIELD_VIEW),	intent(in)			::	LIST2(:)
type(FIELD_VIEW),	intent(in)			::	LIST3(:)

Return Value integer(kind=JPIM)

Derived Types

type, public :: SPEC_VIEW

Components

Type	Visibility	Attributes		Name		Initial
real(kind=JPRB),	public,	POINTER	::	P(:)	=>	NULL()
character(len=:),	public,	POINTER	::	NAME	=>	NULL()

type, public :: GRID_VIEW

Components

Type	Visibility	Attributes		Name		Initial
real(kind=JPRB),	public,	POINTER	::	P(:,:)	=>	NULL()
character(len=:),	public,	POINTER	::	NAME	=>	NULL()
integer(kind=JPIM),	public		::	IVSET

type, public :: IVSET_PTR

Components

Type	Visibility	Attributes		Name		Initial
integer(kind=JPIM),	public,	POINTER	::	PTR(:)	=>	NULL()
integer(kind=JPIM),	public		::	BASE	=	1

Functions

public function LG_COUNT(YLFL) result(IOFF)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in),		TARGET	::	YLFL(:)

Return Value integer(kind=JPIM)

public function LS_COUNT(YLFL) result(IOFF)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in),		TARGET	::	YLFL(:)

Return Value integer(kind=JPIM)

Subroutines

public subroutine LG(YLFL, LGV, IVSET)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in),		TARGET	::	YLFL(:)
type(GRID_VIEW),	intent(inout)			::	LGV(:)
type(IVSET_PTR),	intent(in),	optional		::	IVSET(:)

public subroutine LS(YLFL, LSV)

Arguments

Type	Intent	Optional	Attributes		Name
type(FIELD_VIEW),	intent(in),		TARGET	::	YLFL(:)
type(SPEC_VIEW),	intent(inout)			::	LSV(:)