fms_diag_bbox_mod defines classes encapsulating bounding boxes and interval bounds. More...

Data Types
type	fmsdiagboundshalos_type
	Data structure holding starting and ending indices in the I, J, and K dimensions. It also has extra members related to halo sizes and updated indices in I and J dimensions. More...

Functions/Subroutines
logical pure function, public	determine_if_block_is_in_region (subregion_start, subregion_end, bounds, dim)
	The PEs grid points are divided further into "blocks". This function determines if a block.

procedure	get_fie (this)
	Gets the updated index ‘fie’ of fmsDiagBoundsHalos_type in the I dimension.

pure integer function	get_fie (this)
	Gets the updated index ‘fie’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_fis (this)
	Gets the updated index ‘fis’ of fmsDiagBoundsHalos_type in the I dimension.

pure integer function	get_fis (this)
	Gets the updated index ‘fis’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_fje (this)
	Gets the updated index ‘fje’ of fmsDiagBoundsHalos_type in the I dimension.

pure integer function	get_fje (this)
	Gets the updated index ‘fje’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_fjs (this)
	Gets the updated index ‘fjs’ of fmsDiagBoundsHalos_type in the I dimension.

pure integer function	get_fjs (this)
	Gets the updated index ‘fjs’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_hi (this)
	Gets the halo size of fmsDiagBoundsHalos_type in the I dimension.

pure integer function	get_hi (this)
	Gets the halo size of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_hj (this)
	Gets the halo size of fmsDiagBoundsHalos_type in the J dimension.

pure integer function	get_hj (this)
	Gets the halo size of fmsDiagBoundsHalos_type in the J dimension.

procedure	get_imax (this)
	Gets imax of fmsDiagIbounds_type.

pure integer function	get_imax (this)
	Gets imax of fmsDiagIbounds_type.

procedure	get_imin (this)
	Gets imin of fmsDiagIbounds_type.

pure integer function	get_imin (this)
	Gets imin of fmsDiagIbounds_type.

procedure	get_jmax (this)
	Gets jmax of fmsDiagIbounds_type.

pure integer function	get_jmax (this)
	Gets jmax of fmsDiagIbounds_type.

procedure	get_jmin (this)
	Gets jmin of fmsDiagIbounds_type.

pure integer function	get_jmin (this)
	Gets jmin of fmsDiagIbounds_type.

procedure	get_kmax (this)
	Gets kmax of fmsDiagIbounds_type.

pure integer function	get_kmax (this)
	Gets kmax of fmsDiagIbounds_type.

procedure	get_kmin (this)
	Gets kmin of fmsDiagIbounds_type.

pure integer function	get_kmin (this)
	Gets kmin of fmsDiagIbounds_type.

procedure	rebase_input (bounds_in, bounds, starting, ending, dim)
	Rebase the input bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

subroutine	rebase_input (bounds_in, bounds, starting, ending, dim)
	Rebase the input bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

procedure	rebase_output (bounds_out, starting, ending, dim)
	Rebase the ouput bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

subroutine	rebase_output (bounds_out, starting, ending, dim)
	Rebase the ouput bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

logical function, public	recondition_indices (indices, field, is_in, js_in, ks_in, ie_in, je_in, ke_in, err_msg)
	Updates indices based on presence/absence of input indices is, js, ks, ie, je, and ke.

procedure	reset (this, lower_val, upper_val)
	Reset the instance bounding lower and upper bounds to lower_val and upper_val, respectively.

subroutine	reset_bounds (this, lower_val, upper_val)
	Reset the instance bounding lower and upper bounds to lower_val and upper_val, respectively.

procedure	reset_bounds_from_array_4d (this, array)
	Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

subroutine	reset_bounds_from_array_4d (this, array)
	Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

procedure	reset_bounds_from_array_5d (this, array)
	Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

subroutine	reset_bounds_from_array_5d (this, array)
	Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

procedure	set_bounds (this, field_data, lower_i, upper_i, lower_j, upper_j, lower_k, upper_k, has_halos)
	Sets the bounds of a bounding region.

character(len=150) function	set_bounds (this, field_data, lower_i, upper_i, lower_j, upper_j, lower_k, upper_k, has_halos)
	Sets the bounds of a bounding region.

procedure	update_bounds (this, lower_i, upper_i, lower_j, upper_j, lower_k, upper_k)
	Update the the first three (normally x, y, and z) min and max boundaries (array indices) of the instance bounding box the six specified bounds values.

subroutine	update_bounds (this, lower_i, upper_i, lower_j, upper_j, lower_k, upper_k)
	Update the the first three (normally x, y, and z) min and max boundaries (array indices) of the instance bounding box the six specified bounds values.

procedure	update_index (this, starting_index, ending_index, dim, ignore_halos)
	Updates the starting and ending index of a given dimension.

subroutine	update_index (this, starting_index, ending_index, dim, ignore_halos)
	Updates the starting and ending index of a given dimension.

Variables
type(fmsdiagibounds_type)	bounds3d
	Holds starting and ending indices of the I, J, and K dimensions.

integer	fie
	Updated ending index in the I dimension.

integer	fis
	Updated starting index in the I dimension.

integer	fje
	Updated ending index in the J dimension.

integer	fjs
	Updated starting index in the J dimension.

logical	has_halos
	.True. if the buffer has halos

integer	hi
	Halo size in the I dimension.

integer	hj
	Halo size in the J dimension.

integer	imax
	Upper i bound.

integer	imin
	Lower i bound.

integer	jmax
	Upper j bound.

integer	jmin
	Lower j bound.

integer	kmax
	Upper k bound.

integer	kmin
	Lower k bound.

integer	nhalo_i
	Number of halos in i.

integer	nhalo_j
	Number of halos in j.

integer, parameter	xdimension = 1
	Parameter defining the x dimension.

integer, parameter	ydimension = 2
	Parameter defining the y dimension.

integer, parameter	zdimension = 3
	Parameter defininf the z dimension.

Detailed Description

fms_diag_bbox_mod defines classes encapsulating bounding boxes and interval bounds.

Author: Miguel Zuniga

Data Type Documentation

◆ fms_diag_bbox_mod::fmsdiagboundshalos_type

type fms_diag_bbox_mod::fmsdiagboundshalos_type

Data structure holding starting and ending indices in the I, J, and K dimensions. It also has extra members related to halo sizes and updated indices in I and J dimensions.

Definition at line 71 of file fms_diag_bbox.F90.

Collaboration diagram for fmsdiagboundshalos_type:

[legend]

Public Member Functions
procedure	get_fie (this)
	Gets the updated index ‘fie’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_fis (this)
	Gets the updated index ‘fis’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_fje (this)
	Gets the updated index ‘fje’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_fjs (this)
	Gets the updated index ‘fjs’ of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_hi (this)
	Gets the halo size of fmsDiagBoundsHalos_type in the I dimension.

procedure	get_hj (this)
	Gets the halo size of fmsDiagBoundsHalos_type in the J dimension.

Public Attributes
integer	fie
	Updated ending index in the I dimension.

integer	fis
	Updated starting index in the I dimension.

integer	fje
	Updated ending index in the J dimension.

integer	fjs
	Updated starting index in the J dimension.

integer	hi
	Halo size in the I dimension.

integer	hj
	Halo size in the J dimension.

Private Attributes
type(fmsdiagibounds_type)	bounds3d
	Holds starting and ending indices of the I, J, and K dimensions.

Function/Subroutine Documentation

◆ determine_if_block_is_in_region()

logical pure function, public determine_if_block_is_in_region	(	integer, intent(in)	subregion_start,
		integer, intent(in)	subregion_end,
		type(fmsdiagibounds_type), intent(in)	bounds,
		integer, intent(in)	dim
	)

The PEs grid points are divided further into "blocks". This function determines if a block.

Parameters

[in]	subregion_start	Begining of the subregion
[in]	subregion_end	Ending of the subregion
[in]	bounds	Starting and ending of the subregion
[in]	dim	Dimension to check

Definition at line 101 of file fms_diag_bbox.F90.

◆ get_fie() [1/2]

procedure get_fie ( class (fmsdiagboundshalos_type), intent(in) this )

Gets the updated index ‘fie’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fie’

Parameters

[in] this Calling object

Definition at line 85 of file fms_diag_bbox.F90.

◆ get_fie() [2/2]

pure integer function get_fie ( class (fmsdiagboundshalos_type), intent(in) this )

private

Gets the updated index ‘fie’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fie’

Parameters

[in] this Calling object

Definition at line 237 of file fms_diag_bbox.F90.

◆ get_fis() [1/2]

procedure get_fis ( class (fmsdiagboundshalos_type), intent(in) this )

Gets the updated index ‘fis’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fis’

Parameters

[in] this Calling object

Definition at line 84 of file fms_diag_bbox.F90.

◆ get_fis() [2/2]

pure integer function get_fis ( class (fmsdiagboundshalos_type), intent(in) this )

private

Gets the updated index ‘fis’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fis’

Parameters

[in] this Calling object

Definition at line 230 of file fms_diag_bbox.F90.

◆ get_fje() [1/2]

procedure get_fje ( class (fmsdiagboundshalos_type), intent(in) this )

Gets the updated index ‘fje’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fje’

Parameters

[in] this Calling object

Definition at line 87 of file fms_diag_bbox.F90.

◆ get_fje() [2/2]

pure integer function get_fje ( class (fmsdiagboundshalos_type), intent(in) this )

private

Gets the updated index ‘fje’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fje’

Parameters

[in] this Calling object

Definition at line 251 of file fms_diag_bbox.F90.

◆ get_fjs() [1/2]

procedure get_fjs ( class (fmsdiagboundshalos_type), intent(in) this )

Gets the updated index ‘fjs’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fjs’

Parameters

[in] this Calling object

Definition at line 86 of file fms_diag_bbox.F90.

◆ get_fjs() [2/2]

pure integer function get_fjs ( class (fmsdiagboundshalos_type), intent(in) this )

private

Gets the updated index ‘fjs’ of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member ‘fjs’

Parameters

[in] this Calling object

Definition at line 244 of file fms_diag_bbox.F90.

◆ get_hi() [1/2]

procedure get_hi ( class (fmsdiagboundshalos_type), intent(in) this )

Gets the halo size of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member hi

Parameters

[in] this Calling object

Definition at line 82 of file fms_diag_bbox.F90.

◆ get_hi() [2/2]

pure integer function get_hi ( class (fmsdiagboundshalos_type), intent(in) this )

private

Gets the halo size of fmsDiagBoundsHalos_type in the I dimension.

Returns: copy of integer member hi

Parameters

[in] this Calling object

Definition at line 216 of file fms_diag_bbox.F90.

◆ get_hj() [1/2]

procedure get_hj ( class (fmsdiagboundshalos_type), intent(in) this )

Gets the halo size of fmsDiagBoundsHalos_type in the J dimension.

Returns: copy of integer member hj

Parameters

[in] this Calling object

Definition at line 83 of file fms_diag_bbox.F90.

◆ get_hj() [2/2]

pure integer function get_hj ( class (fmsdiagboundshalos_type), intent(in) this )

private

Gets the halo size of fmsDiagBoundsHalos_type in the J dimension.

Returns: copy of integer member hj

Parameters

[in] this Calling object

Definition at line 223 of file fms_diag_bbox.F90.

◆ get_imax() [1/2]

procedure get_imax ( class (fmsdiagibounds_type), intent(in) this )

Gets imax of fmsDiagIbounds_type.

Returns: copy of integer member imax

Parameters

[in] this The !< ibounds instance

Definition at line 60 of file fms_diag_bbox.F90.

◆ get_imax() [2/2]

pure integer function get_imax ( class (fmsdiagibounds_type), intent(in) this )

private

Gets imax of fmsDiagIbounds_type.

Returns: copy of integer member imax

Parameters

[in] this The !< ibounds instance

Definition at line 145 of file fms_diag_bbox.F90.

◆ get_imin() [1/2]

procedure get_imin ( class (fmsdiagibounds_type), intent(in) this )

Gets imin of fmsDiagIbounds_type.

Returns: copy of integer member imin

Parameters

[in] this The !< ibounds instance

Definition at line 59 of file fms_diag_bbox.F90.

◆ get_imin() [2/2]

pure integer function get_imin ( class (fmsdiagibounds_type), intent(in) this )

private

Gets imin of fmsDiagIbounds_type.

Returns: copy of integer member imin

Parameters

[in] this The !< ibounds instance

Definition at line 138 of file fms_diag_bbox.F90.

◆ get_jmax() [1/2]

procedure get_jmax ( class (fmsdiagibounds_type), intent(in) this )

Gets jmax of fmsDiagIbounds_type.

Returns: copy of integer member jmax

Parameters

[in] this The !< ibounds instance

Definition at line 62 of file fms_diag_bbox.F90.

◆ get_jmax() [2/2]

pure integer function get_jmax ( class (fmsdiagibounds_type), intent(in) this )

private

Gets jmax of fmsDiagIbounds_type.

Returns: copy of integer member jmax

Parameters

[in] this The !< ibounds instance

Definition at line 159 of file fms_diag_bbox.F90.

◆ get_jmin() [1/2]

procedure get_jmin ( class (fmsdiagibounds_type), intent(in) this )

Gets jmin of fmsDiagIbounds_type.

Returns: copy of integer member jmin

Parameters

[in] this The !< ibounds instance

Definition at line 61 of file fms_diag_bbox.F90.

◆ get_jmin() [2/2]

pure integer function get_jmin ( class (fmsdiagibounds_type), intent(in) this )

private

Gets jmin of fmsDiagIbounds_type.

Returns: copy of integer member jmin

Parameters

[in] this The !< ibounds instance

Definition at line 152 of file fms_diag_bbox.F90.

◆ get_kmax() [1/2]

procedure get_kmax ( class (fmsdiagibounds_type), intent(in) this )

Gets kmax of fmsDiagIbounds_type.

Returns: copy of integer member kmax

Parameters

[in] this The !< ibounds instance

Definition at line 64 of file fms_diag_bbox.F90.

◆ get_kmax() [2/2]

pure integer function get_kmax ( class (fmsdiagibounds_type), intent(in) this )

private

Gets kmax of fmsDiagIbounds_type.

Returns: copy of integer member kmax

Parameters

[in] this The !< ibounds instance

Definition at line 174 of file fms_diag_bbox.F90.

◆ get_kmin() [1/2]

procedure get_kmin ( class (fmsdiagibounds_type), intent(in) this )

Gets kmin of fmsDiagIbounds_type.

Returns: copy of integer member kmin

Parameters

[in] this The !< ibounds instance

Definition at line 63 of file fms_diag_bbox.F90.

◆ get_kmin() [2/2]

pure integer function get_kmin ( class (fmsdiagibounds_type), intent(in) this )

private

Gets kmin of fmsDiagIbounds_type.

Returns: copy of integer member kmin

Parameters

[in] this The !< ibounds instance

Definition at line 167 of file fms_diag_bbox.F90.

◆ rebase_input() [1/2]

procedure rebase_input	(	class (fmsdiagibounds_type), intent(inout)	bounds_in,
		class (fmsdiagibounds_type), intent(in)	bounds,
		integer, intent(in)	starting,
		integer, intent(in)	ending,
		integer, intent(in)	dim
	)

Rebase the input bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

Parameters

[in,out]	bounds_in	Bounds to rebase
[in]	bounds	Original indices (i.e is_in, ie_in, passed into diag_manager)
[in]	starting	Starting index of the dimension
[in]	ending	Ending index of the dimension
[in]	dim	Dimension to update

Definition at line 57 of file fms_diag_bbox.F90.

◆ rebase_input() [2/2]

subroutine rebase_input	(	class (fmsdiagibounds_type), intent(inout)	bounds_in,
		class (fmsdiagibounds_type), intent(in)	bounds,
		integer, intent(in)	starting,
		integer, intent(in)	ending,
		integer, intent(in)	dim
	)

private

Rebase the input bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

Parameters

[in,out]	bounds_in	Bounds to rebase
[in]	bounds	Original indices (i.e is_in, ie_in, passed into diag_manager)
[in]	starting	Starting index of the dimension
[in]	ending	Ending index of the dimension
[in]	dim	Dimension to update

The starting index is going to be either "starting" if only a section of the block is in the subregion or starting-boundsimin+1 if the whole section of the block is in the subregion.

The ending index is going to be either bounds_out%[]max if the whole section of the block is in the subregion or bounds%[]min + size of the subregion if only a section of the block is in the susbregion

Definition at line 497 of file fms_diag_bbox.F90.

◆ rebase_output() [1/2]

procedure rebase_output	(	class (fmsdiagibounds_type), intent(inout)	bounds_out,
		integer, intent(in)	starting,
		integer, intent(in)	ending,
		integer, intent(in)	dim
	)

Rebase the ouput bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

Parameters

[in,out]	bounds_out	Bounds to rebase
[in]	starting	Starting index of the dimension
[in]	ending	Ending index of the dimension
[in]	dim	Dimension to update

Definition at line 58 of file fms_diag_bbox.F90.

◆ rebase_output() [2/2]

subroutine rebase_output	(	class (fmsdiagibounds_type), intent(inout)	bounds_out,
		integer, intent(in)	starting,
		integer, intent(in)	ending,
		integer, intent(in)	dim
	)

private

Rebase the ouput bounds for a given dimension based on the starting and ending indices of a subregion. This is for when blocking is used.

Parameters

[in,out]	bounds_out	Bounds to rebase
[in]	starting	Starting index of the dimension
[in]	ending	Ending index of the dimension
[in]	dim	Dimension to update

The starting index is going to be either "starting" if only a section of the block is in the subregion or bounds_out%[]min if the whole section of the block is in the subregion. The -starting+1 s needed so that indices start as 1 since the output buffer has indices 1:size of a subregion

The ending index is going to be either bounds_out%[]max if the whole section of the block is in the subregion or bounds_out%[]min + size of the subregion if only a section of the block is in the susbregion

Definition at line 468 of file fms_diag_bbox.F90.

◆ recondition_indices()

logical function, public recondition_indices	(	type(fmsdiagboundshalos_type), intent(inout)	indices,
		class(*), dimension(:,:,:,:), intent(in)	field,
		integer, intent(in), optional	is_in,
		integer, intent(in), optional	js_in,
		integer, intent(in), optional	ks_in,
		integer, intent(in), optional	ie_in,
		integer, intent(in), optional	je_in,
		integer, intent(in), optional	ke_in,
		character(len=*), intent(out), optional	err_msg
	)

Updates indices based on presence/absence of input indices is, js, ks, ie, je, and ke.

Returns: .false. if there is no error else .true.

Parameters

[in,out]	indices	Stores indices in order: (/is, js, ks, ie, je, ke, hi, fis, fie, hj, fjs, fje/)
[in]	field	Dummy variable; only the sizes of the first 3 dimensions are used
[in]	ke_in	User input indices
[out]	err_msg	Error message to pass back to caller

Returns: Error flag

Definition at line 379 of file fms_diag_bbox.F90.

◆ reset()

procedure reset	(	class (fmsdiagibounds_type), intent(inout), target	this,
		integer, intent(in)	lower_val,
		integer, intent(in)	upper_val
	)

Reset the instance bounding lower and upper bounds to lower_val and upper_val, respectively.

Parameters

[in,out]	this	ibounds instance
[in]	lower_val	value for the lower bounds in each dimension
[in]	upper_val	value for the upper bounds in each dimension

Definition at line 52 of file fms_diag_bbox.F90.

◆ reset_bounds()

subroutine reset_bounds	(	class (fmsdiagibounds_type), intent(inout), target	this,
		integer, intent(in)	lower_val,
		integer, intent(in)	upper_val
	)

private

Reset the instance bounding lower and upper bounds to lower_val and upper_val, respectively.

Parameters

[in,out]	this	ibounds instance
[in]	lower_val	value for the lower bounds in each dimension
[in]	upper_val	value for the upper bounds in each dimension

Definition at line 257 of file fms_diag_bbox.F90.

◆ reset_bounds_from_array_4d() [1/2]

procedure reset_bounds_from_array_4d	(	class (fmsdiagibounds_type), intent(inout)	this,
		class(*), dimension(:,:,:,:), intent(in)	array
	)

Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

Parameters

[in,out]	this	The instance of the bounding box.
[in]	array	The 4D input array.

Definition at line 53 of file fms_diag_bbox.F90.

◆ reset_bounds_from_array_4d() [2/2]

subroutine reset_bounds_from_array_4d	(	class (fmsdiagibounds_type), intent(inout)	this,
		class(*), dimension(:,:,:,:), intent(in)	array
	)

private

Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

Parameters

[in,out]	this	The instance of the bounding box.
[in]	array	The 4D input array.

Definition at line 347 of file fms_diag_bbox.F90.

◆ reset_bounds_from_array_5d() [1/2]

procedure reset_bounds_from_array_5d	(	class (fmsdiagibounds_type), intent(inout)	this,
		class(*), dimension(:,:,:,:,:), intent(in)	array
	)

Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

Parameters

[in,out]	this	The instance of the bounding box.
[in]	array	The 5D input array.

Definition at line 54 of file fms_diag_bbox.F90.

◆ reset_bounds_from_array_5d() [2/2]

subroutine reset_bounds_from_array_5d	(	class (fmsdiagibounds_type), intent(inout)	this,
		class(*), dimension(:,:,:,:,:), intent(in)	array
	)

private

Reset the instance bounding box with the bounds determined from the first three dimensions of the 5D "array" argument.

Parameters

[in,out]	this	The instance of the bounding box.
[in]	array	The 5D input array.

Definition at line 364 of file fms_diag_bbox.F90.

◆ set_bounds() [1/2]

procedure set_bounds	(	class (fmsdiagibounds_type), intent(inout)	this,
		class(*), dimension(:,:,:,:), intent(in)	field_data,
		integer, intent(in)	lower_i,
		integer, intent(in)	upper_i,
		integer, intent(in)	lower_j,
		integer, intent(in)	upper_j,
		integer, intent(in)	lower_k,
		integer, intent(in)	upper_k,
		logical, intent(in)	has_halos
	)

Sets the bounds of a bounding region.

Returns: empty string if sucessful or error message if unsucessful

Parameters

[in,out]	this	The bounding box of the field
[in]	field_data	Field data
[in]	lower_i	Lower i bound.
[in]	upper_i	Upper i bound.
[in]	lower_j	Lower j bound.
[in]	upper_j	Upper j bound.
[in]	lower_k	Lower k bound.
[in]	upper_k	Upper k bound.
[in]	has_halos	.true. if the field has halos

Returns: Error message to output

Definition at line 56 of file fms_diag_bbox.F90.

◆ set_bounds() [2/2]

character(len=150) function set_bounds	(	class (fmsdiagibounds_type), intent(inout)	this,
		class(*), dimension(:,:,:,:), intent(in)	field_data,
		integer, intent(in)	lower_i,
		integer, intent(in)	upper_i,
		integer, intent(in)	lower_j,
		integer, intent(in)	upper_j,
		integer, intent(in)	lower_k,
		integer, intent(in)	upper_k,
		logical, intent(in)	has_halos
	)

private

Sets the bounds of a bounding region.

Returns: empty string if sucessful or error message if unsucessful

Parameters

[in,out]	this	The bounding box of the field
[in]	field_data	Field data
[in]	lower_i	Lower i bound.
[in]	upper_i	Upper i bound.
[in]	lower_j	Lower j bound.
[in]	upper_j	Upper j bound.
[in]	lower_k	Lower k bound.
[in]	upper_k	Upper k bound.
[in]	has_halos	.true. if the field has halos

Returns: Error message to output

Definition at line 290 of file fms_diag_bbox.F90.

◆ update_bounds() [1/2]

procedure update_bounds	(	class (fmsdiagibounds_type), intent(inout)	this,
		integer, intent(in)	lower_i,
		integer, intent(in)	upper_i,
		integer, intent(in)	lower_j,
		integer, intent(in)	upper_j,
		integer, intent(in)	lower_k,
		integer, intent(in)	upper_k
	)

Update the the first three (normally x, y, and z) min and max boundaries (array indices) of the instance bounding box the six specified bounds values.

Parameters

[in,out]	this	The bounding box of the output field buffer inindex space.
[in]	lower_i	Lower i bound.
[in]	upper_i	Upper i bound.
[in]	lower_j	Lower j bound.
[in]	upper_j	Upper j bound.
[in]	lower_k	Lower k bound.
[in]	upper_k	Upper k bound.

Definition at line 55 of file fms_diag_bbox.F90.

◆ update_bounds() [2/2]

subroutine update_bounds	(	class (fmsdiagibounds_type), intent(inout)	this,
		integer, intent(in)	lower_i,
		integer, intent(in)	upper_i,
		integer, intent(in)	lower_j,
		integer, intent(in)	upper_j,
		integer, intent(in)	lower_k,
		integer, intent(in)	upper_k
	)

private

Update the the first three (normally x, y, and z) min and max boundaries (array indices) of the instance bounding box the six specified bounds values.

Parameters

[in,out]	this	The bounding box of the output field buffer inindex space.
[in]	lower_i	Lower i bound.
[in]	upper_i	Upper i bound.
[in]	lower_j	Lower j bound.
[in]	upper_j	Upper j bound.
[in]	lower_k	Lower k bound.
[in]	upper_k	Upper k bound.

Definition at line 272 of file fms_diag_bbox.F90.

◆ update_index() [1/2]

procedure update_index	(	class (fmsdiagibounds_type), intent(inout)	this,
		integer, intent(in)	starting_index,
		integer, intent(in)	ending_index,
		integer, intent(in)	dim,
		logical, intent(in)	ignore_halos
	)

Updates the starting and ending index of a given dimension.

Parameters

[in,out]	this	The bounding box to update
[in]	starting_index	Starting index to update to
[in]	ending_index	Ending index to update to
[in]	dim	Dimension to update
[in]	ignore_halos	If .true. halos will be ignored i.e output buffers can ignore halos as they do not get updates. The indices of the Input buffers need to add the number of halos so math is done only on the compute domain

Definition at line 65 of file fms_diag_bbox.F90.

◆ update_index() [2/2]

subroutine update_index	(	class (fmsdiagibounds_type), intent(inout)	this,
		integer, intent(in)	starting_index,
		integer, intent(in)	ending_index,
		integer, intent(in)	dim,
		logical, intent(in)	ignore_halos
	)

private

Updates the starting and ending index of a given dimension.

Parameters

[in,out]	this	The bounding box to update
[in]	starting_index	Starting index to update to
[in]	ending_index	Ending index to update to
[in]	dim	Dimension to update
[in]	ignore_halos	If .true. halos will be ignored i.e output buffers can ignore halos as they do not get updates. The indices of the Input buffers need to add the number of halos so math is done only on the compute domain

Definition at line 180 of file fms_diag_bbox.F90.

Variable Documentation

◆ bounds3d

type(fmsdiagibounds_type) bounds3d

private

Holds starting and ending indices of the I, J, and K dimensions.

Definition at line 73 of file fms_diag_bbox.F90.

◆ fie

integer fie

Updated ending index in the I dimension.

Definition at line 78 of file fms_diag_bbox.F90.

◆ fis

integer fis

Updated starting index in the I dimension.

Definition at line 77 of file fms_diag_bbox.F90.

◆ fje

integer fje

Updated ending index in the J dimension.

Definition at line 80 of file fms_diag_bbox.F90.

◆ fjs

integer fjs

Updated starting index in the J dimension.

Definition at line 79 of file fms_diag_bbox.F90.

◆ has_halos

logical has_halos

.True. if the buffer has halos

Definition at line 48 of file fms_diag_bbox.F90.

◆ hi

integer hi

Halo size in the I dimension.

Definition at line 75 of file fms_diag_bbox.F90.

◆ hj

integer hj

Halo size in the J dimension.

Definition at line 76 of file fms_diag_bbox.F90.

◆ imax

integer imax

Upper i bound.

Definition at line 43 of file fms_diag_bbox.F90.

◆ imin

integer imin

Lower i bound.

Definition at line 42 of file fms_diag_bbox.F90.

◆ jmax

integer jmax

Upper j bound.

Definition at line 45 of file fms_diag_bbox.F90.

◆ jmin

integer jmin

Lower j bound.

Definition at line 44 of file fms_diag_bbox.F90.

◆ kmax

integer kmax

Upper k bound.

Definition at line 47 of file fms_diag_bbox.F90.

◆ kmin

integer kmin

Lower k bound.

Definition at line 46 of file fms_diag_bbox.F90.

◆ nhalo_i

integer nhalo_i

Number of halos in i.

Definition at line 49 of file fms_diag_bbox.F90.

◆ nhalo_j

integer nhalo_j

Number of halos in j.

Definition at line 50 of file fms_diag_bbox.F90.

◆ xdimension

integer, parameter xdimension = 1

Parameter defining the x dimension.

Definition at line 92 of file fms_diag_bbox.F90.

◆ ydimension

integer, parameter ydimension = 2

private

Parameter defining the y dimension.

Definition at line 93 of file fms_diag_bbox.F90.

◆ zdimension

integer, parameter zdimension = 3

private

Parameter defininf the z dimension.

Definition at line 94 of file fms_diag_bbox.F90.

Data Types

Functions/Subroutines

Variables

Detailed Description

Data Type Documentation

◆ fms_diag_bbox_mod::fmsdiagboundshalos_type

Public Member Functions

Public Attributes

Private Attributes

Function/Subroutine Documentation

◆ determine_if_block_is_in_region()

◆ get_fie() [1/2]

◆ get_fie() [2/2]

◆ get_fis() [1/2]

◆ get_fis() [2/2]

◆ get_fje() [1/2]

◆ get_fje() [2/2]

◆ get_fjs() [1/2]

◆ get_fjs() [2/2]

◆ get_hi() [1/2]

◆ get_hi() [2/2]

◆ get_hj() [1/2]

◆ get_hj() [2/2]

◆ get_imax() [1/2]

◆ get_imax() [2/2]

◆ get_imin() [1/2]

◆ get_imin() [2/2]

◆ get_jmax() [1/2]

◆ get_jmax() [2/2]

◆ get_jmin() [1/2]

◆ get_jmin() [2/2]

◆ get_kmax() [1/2]

◆ get_kmax() [2/2]

◆ get_kmin() [1/2]

◆ get_kmin() [2/2]

◆ rebase_input() [1/2]

◆ rebase_input() [2/2]

◆ rebase_output() [1/2]

◆ rebase_output() [2/2]

◆ recondition_indices()

◆ reset()

◆ reset_bounds()

◆ reset_bounds_from_array_4d() [1/2]

◆ reset_bounds_from_array_4d() [2/2]

◆ reset_bounds_from_array_5d() [1/2]

◆ reset_bounds_from_array_5d() [2/2]

◆ set_bounds() [1/2]

◆ set_bounds() [2/2]

◆ update_bounds() [1/2]

◆ update_bounds() [2/2]

◆ update_index() [1/2]

◆ update_index() [2/2]

Variable Documentation

◆ bounds3d

◆ fie

◆ fis

◆ fje

◆ fjs

◆ has_halos

◆ hi

◆ hj

◆ imax

◆ imin

◆ jmax

◆ jmin

◆ kmax

◆ kmin

◆ nhalo_i

◆ nhalo_j

◆ xdimension

◆ ydimension

◆ zdimension