Test_LatLon_GridFactory Module

Uses

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
character(len=*),	public,	parameter	::	resource_file	=	'Test_LatLonGridFactory.rc'

Interfaces

public interface GridCase

public function GridCase_global(nx, ny, im_world, jm_world, dateline, pole, default_decomposition, ims, jms, lons, lats) result(param)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
integer,	intent(in)			::	im_world
integer,	intent(in)			::	jm_world
character(len=2),	intent(in)			::	dateline
character(len=2),	intent(in)			::	pole
logical,	intent(in)			::	default_decomposition
integer,	intent(in)			::	ims(:)
integer,	intent(in)			::	jms(:)
real,	intent(in)			::	lons(:)
real,	intent(in)			::	lats(:)

Return Value type(GridCase)

public function GridCase_local(nx, ny, im_world, jm_world, lon_range, lat_range, default_decomposition, ims, jms, lons, lats) result(param)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
integer,	intent(in)			::	im_world
integer,	intent(in)			::	jm_world
type(RealMinMax),	intent(in)			::	lon_range
type(RealMinMax),	intent(in)			::	lat_range
logical,	intent(in)			::	default_decomposition
integer,	intent(in)			::	ims(:)
integer,	intent(in)			::	jms(:)
real,	intent(in)			::	lons(:)
real,	intent(in)			::	lats(:)

Return Value type(GridCase)

public interface Test_LatLonGridFactory

public function newTest_LatLonGridFactory(testParameter) result(aTest)

Arguments

Type	Intent	Optional	Attributes		Name
class(GridCase),	intent(in)			::	testParameter

Return Value type(Test_LatLonGridFactory)

Derived Types

type, public, extends(ESMF_TestParameter) :: GridCase

Components

Type	Visibility	Attributes		Name		Initial
character(len=2),	public		::	dateline
character(len=2),	public		::	pole
integer,	public		::	im_world
integer,	public,	allocatable	::	ims(:)
integer,	public		::	jm_world
integer,	public,	allocatable	::	jms(:)
integer,	public		::	numPETsRequested
integer,	public		::	nx
integer,	public		::	ny
logical,	public		::	default_decomposition	=	.false.
real,	public,	allocatable	::	lats(:)
real,	public,	allocatable	::	lons(:)
type(RealMinMax),	public		::	lat_range
type(RealMinMax),	public		::	lon_range

Constructor

public function GridCase_global (nx, ny, im_world, jm_world, dateline, pole, default_decomposition, ims, jms, lons, lats)
public function GridCase_local (nx, ny, im_world, jm_world, lon_range, lat_range, default_decomposition, ims, jms, lons, lats)

Type-Bound Procedures

procedure, public :: getNumPetsRequested => getNumPETsRequested
procedure, public :: setNumPetsRequested => setNumPETsRequested
procedure, public :: toString
procedure, public :: toStringActual

type, public, extends(ESMF_TestCase) :: Test_LatLonGridFactory

Components

Type	Visibility	Attributes		Name		Initial
integer,	public		::	numThreads
integer,	public		::	val	=	3
type(ESMF_Grid),	public		::	grid
type(ESMF_GridComp),	public,	pointer	::	gc	=>	null()
type(InternalState),	public,	pointer	::	wrapped
type(LatLonGridFactory),	public		::	factory

Constructor

public function newTest_LatLonGridFactory (testParameter)

Type-Bound Procedures

procedure, public :: barrier
procedure, public :: clearInternalState
procedure, public :: getLocalPET
procedure, public :: getNumPETsRequested
procedure, public :: getPetCount
procedure, public :: getVM
procedure, public :: runBare
procedure, public :: setInternalState
procedure, public :: setUp
procedure, public :: tearDown

Functions

public function toString(this) result(string)

Arguments

Type	Intent	Optional	Attributes		Name
class(GridCase),	intent(in)			::	this

Return Value character(len=:), allocatable

public function GridCase_global(nx, ny, im_world, jm_world, dateline, pole, default_decomposition, ims, jms, lons, lats) result(param)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
integer,	intent(in)			::	im_world
integer,	intent(in)			::	jm_world
character(len=2),	intent(in)			::	dateline
character(len=2),	intent(in)			::	pole
logical,	intent(in)			::	default_decomposition
integer,	intent(in)			::	ims(:)
integer,	intent(in)			::	jms(:)
real,	intent(in)			::	lons(:)
real,	intent(in)			::	lats(:)

Return Value type(GridCase)

public function GridCase_local(nx, ny, im_world, jm_world, lon_range, lat_range, default_decomposition, ims, jms, lons, lats) result(param)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	nx
integer,	intent(in)			::	ny
integer,	intent(in)			::	im_world
integer,	intent(in)			::	jm_world
type(RealMinMax),	intent(in)			::	lon_range
type(RealMinMax),	intent(in)			::	lat_range
logical,	intent(in)			::	default_decomposition
integer,	intent(in)			::	ims(:)
integer,	intent(in)			::	jms(:)
real,	intent(in)			::	lons(:)
real,	intent(in)			::	lats(:)

Return Value type(GridCase)

public function getParameters() result(params)

Arguments

None

Return Value type(GridCase), allocatable, (:)

public function newTest_LatLonGridFactory(testParameter) result(aTest)

Arguments

Type	Intent	Optional	Attributes		Name
class(GridCase),	intent(in)			::	testParameter

Return Value type(Test_LatLonGridFactory)

Subroutines

public subroutine setUp(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(Test_LatLonGridFactory),	intent(inout)			::	this

public subroutine tearDown(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(Test_LatLonGridFactory),	intent(inout)			::	this

public subroutine test_centers(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(Test_LatLonGridFactory),	intent(inout)			::	this

public subroutine test_shape(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(Test_LatLonGridFactory),	intent(inout)			::	this