ice_blocks Module Reference

Data Types
type	block
interface	PrintTrouble
Functions/Subroutines
subroutine	PrintTrouble_dbl (name, array)
subroutine	PrintTrouble_int (name, array)
subroutine	LocateTrouble
subroutine	create_blocks (nx_global, ny_global, ew_boundary_type, ns_boundary_type)
integer(int_kind)	ice_blocksGetNbrID (blockID, direction, iBoundary, jBoundary)
type(block)	get_block (block_id, local_id)
subroutine	get_block_parameter (block_id, local_id, ilo, ihi, jlo, jhi, iblock, jblock, tripole, i_glob, j_glob)
Variables
integer(int_kind), parameter	nghost = 1
integer(int_kind), parameter	nx_block = block_size_x + 2*nghost
integer(int_kind), parameter	ny_block = block_size_y + 2*nghost
integer(int_kind), parameter	ice_blocksNorth = 1
integer(int_kind), parameter	ice_blocksSouth = 2
integer(int_kind), parameter	ice_blocksEast = 3
integer(int_kind), parameter	ice_blocksWest = 4
integer(int_kind), parameter	ice_blocksNorthEast = 5
integer(int_kind), parameter	ice_blocksNorthWest = 6
integer(int_kind), parameter	ice_blocksSouthEast = 7
integer(int_kind), parameter	ice_blocksSouthWest = 8
integer(int_kind), parameter	ice_blocksEastNorthEast = 17
integer(int_kind)	nblocks_tot
integer(int_kind)	nblocks_x
integer(int_kind)	nblocks_y
integer(int_kind), parameter	trouble_ig = 2
integer(int_kind), parameter	trouble_jg = 2
integer(int_kind)	trouble_il
integer(int_kind)	trouble_jl
integer(int_kind)	trouble_ibl
type(block), dimension(:), allocatable	all_blocks
integer(int_kind), dimension(:,:), allocatable	all_blocks_ij
integer(int_kind), dimension(:,:), allocatable, target	i_global
integer(int_kind), dimension(:,:), allocatable, target	j_global

---

Function/Subroutine Documentation

subroutine ice_blocks::create_blocks	(	integer (int_kind),intent(in)	nx_global,
		integer (int_kind),intent(in)	ny_global,
		character (*),intent(in)	ew_boundary_type,
		character (*),intent(in)	ns_boundary_type
	)

Definition at line 208 of file ice_blocks.F90.

type (block) ice_blocks::get_block	(	integer (int_kind),intent(in)	block_id,
		integer (int_kind),intent(in)	local_id
	)

Definition at line 910 of file ice_blocks.F90.

subroutine ice_blocks::get_block_parameter	(	integer (int_kind),intent(in)	block_id,
		integer (int_kind),intent(out),optional	local_id,
		integer (int_kind),intent(out),optional	ilo,
		integer (int_kind),intent(out),optional	ihi,
		integer (int_kind),intent(out),optional	jlo,
		integer (int_kind),intent(out),optional	jhi,
		integer (int_kind),intent(out),optional	iblock,
		integer (int_kind),intent(out),optional	jblock,
		logical (log_kind),intent(out),optional	tripole,
		integer (int_kind),dimension(:),optional,pointer	i_glob,
		integer (int_kind),dimension(:),optional,pointer	j_glob
	)

Definition at line 955 of file ice_blocks.F90.

integer (int_kind) ice_blocks::ice_blocksGetNbrID	(	integer (int_kind),intent(in)	blockID,
		integer (int_kind),intent(in)	direction,
		character (*),intent(in)	iBoundary,
		character (*),intent(in)	jBoundary
	)

Definition at line 447 of file ice_blocks.F90.

subroutine ice_blocks::LocateTrouble

(

)

Definition at line 161 of file ice_blocks.F90.

subroutine ice_blocks::PrintTrouble_dbl	(	character(len=*),intent(in)	name,
		real(kind=dbl_kind),dimension(nx_block,ny_block),intent(in)	array
	)			[private]

Definition at line 139 of file ice_blocks.F90.

subroutine ice_blocks::PrintTrouble_int	(	character(len=*),intent(in)	name,
		integer(int_kind),dimension(nx_block,ny_block),intent(in)	array
	)

Definition at line 150 of file ice_blocks.F90.

---

Variable Documentation

type (block),dimension(:),allocatable ice_blocks::all_blocks

Definition at line 122 of file ice_blocks.F90.

integer (int_kind),dimension(:,:),allocatable ice_blocks::all_blocks_ij

Definition at line 125 of file ice_blocks.F90.

integer (int_kind),dimension(:,:),allocatable,target ice_blocks::i_global

Definition at line 130 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksEast = 3

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksEastNorthEast = 17

Definition at line 91 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksNorth = 1

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksNorthEast = 5

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksNorthWest = 6

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksSouth = 2

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksSouthEast = 7

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksSouthWest = 8

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ice_blocksWest = 4

Definition at line 73 of file ice_blocks.F90.

integer (int_kind),dimension(:,:),allocatable,target ice_blocks::j_global

Definition at line 130 of file ice_blocks.F90.

integer (int_kind) ice_blocks::nblocks_tot

Definition at line 103 of file ice_blocks.F90.

integer (int_kind) ice_blocks::nblocks_x

Definition at line 103 of file ice_blocks.F90.

integer (int_kind) ice_blocks::nblocks_y

Definition at line 103 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::nghost = 1

Definition at line 61 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::nx_block = block_size_x + 2*nghost

Definition at line 64 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::ny_block = block_size_y + 2*nghost

Definition at line 64 of file ice_blocks.F90.

integer (int_kind) ice_blocks::trouble_ibl

Definition at line 112 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::trouble_ig = 2

Definition at line 108 of file ice_blocks.F90.

integer (int_kind) ice_blocks::trouble_il

Definition at line 112 of file ice_blocks.F90.

integer (int_kind),parameter ice_blocks::trouble_jg = 2

Definition at line 108 of file ice_blocks.F90.

integer (int_kind) ice_blocks::trouble_jl

Definition at line 112 of file ice_blocks.F90.