Oasis3 4.0.2
mpp_domains_mod_oa.F90 File Reference
#include <os.h>
#include <mpp_update_domains2D.h>
#include <mpp_global_reduce.h>
#include <mpp_global_sum.h>
#include <mpp_global_field.h>
Include dependency graph for mpp_domains_mod_oa.F90:

Go to the source code of this file.

Data Types

type  mpp_domains_mod_oa::domain_axis_spec
type  mpp_domains_mod_oa::domain1D
type  mpp_domains_mod_oa::rectangle
type  mpp_domains_mod_oa::domain2D
interface  mpp_domains_mod_oa::mpp_copy_domains
interface  mpp_domains_mod_oa::mpp_define_domains
interface  mpp_domains_mod_oa::mpp_update_domains
interface  mpp_domains_mod_oa::mpp_redistribute
interface  mpp_domains_mod_oa::mpp_global_field
interface  mpp_domains_mod_oa::mpp_global_max
interface  mpp_domains_mod_oa::mpp_global_min
interface  mpp_domains_mod_oa::mpp_global_sum
interface  mpp_domains_mod_oa::operator(.EQ.)
interface  mpp_domains_mod_oa::operator(.NE.)
interface  mpp_domains_mod_oa::mpp_get_compute_domain
interface  mpp_domains_mod_oa::mpp_get_compute_domains
interface  mpp_domains_mod_oa::mpp_get_data_domain
interface  mpp_domains_mod_oa::mpp_get_global_domain
interface  mpp_domains_mod_oa::mpp_define_layout
interface  mpp_domains_mod_oa::mpp_get_pelist
interface  mpp_domains_mod_oa::mpp_get_layout

Modules

module  mpp_domains_mod_oa

Defines

#define VECTOR_FIELD_
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_r8_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_r8_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_r8_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_r8_5D
#define MPP_UPDATE_DOMAINS_2D_V_   mpp_update_domain2D_r8_2Dv
#define MPP_UPDATE_DOMAINS_3D_V_   mpp_update_domain2D_r8_3Dv
#define MPP_UPDATE_DOMAINS_4D_V_   mpp_update_domain2D_r8_4Dv
#define MPP_UPDATE_DOMAINS_5D_V_   mpp_update_domain2D_r8_5Dv
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_r8_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_r8_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_r8_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_r8_5D
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_c8_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_c8_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_c8_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_c8_5D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_c8_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_c8_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_c8_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_c8_5D
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_i8_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_i8_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_i8_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_i8_5D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_i8_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_i8_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_i8_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_i8_5D
#define MPP_TYPE_   logical(LONG_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_l8_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_l8_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_l8_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_l8_5D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_l8_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_l8_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_l8_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_l8_5D
#define VECTOR_FIELD_
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_r4_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_r4_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_r4_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_r4_5D
#define MPP_UPDATE_DOMAINS_2D_V_   mpp_update_domain2D_r4_2Dv
#define MPP_UPDATE_DOMAINS_3D_V_   mpp_update_domain2D_r4_3Dv
#define MPP_UPDATE_DOMAINS_4D_V_   mpp_update_domain2D_r4_4Dv
#define MPP_UPDATE_DOMAINS_5D_V_   mpp_update_domain2D_r4_5Dv
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_r4_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_r4_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_r4_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_r4_5D
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_c4_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_c4_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_c4_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_c4_5D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_c4_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_c4_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_c4_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_c4_5D
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_i4_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_i4_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_i4_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_i4_5D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_i4_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_i4_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_i4_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_i4_5D
#define MPP_TYPE_   logical(INT_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_l4_2D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_l4_3D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_l4_4D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_l4_5D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_l4_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_l4_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_l4_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_l4_5D
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_r8_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_r8_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_r8_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_r8_5d
#define MPP_TYPE_   real(DOUBLE_KIND)
#define REDUCE_VAL_   maxval
#define REDUCE_LOC_   maxloc
#define MPP_REDUCE_   mpp_max
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_r8_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_r8_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_r8_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_r8_5d
#define MPP_TYPE_   real(DOUBLE_KIND)
#define REDUCE_VAL_   minval
#define REDUCE_LOC_   minloc
#define MPP_REDUCE_   mpp_min
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_r4_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_r4_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_r4_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_r4_5d
#define MPP_TYPE_   real(FLOAT_KIND)
#define REDUCE_VAL_   maxval
#define REDUCE_LOC_   maxloc
#define MPP_REDUCE_   mpp_max
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_r4_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_r4_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_r4_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_r4_5d
#define MPP_TYPE_   real(FLOAT_KIND)
#define REDUCE_VAL_   minval
#define REDUCE_LOC_   minloc
#define MPP_REDUCE_   mpp_min
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_i8_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_i8_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_i8_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_i8_5d
#define MPP_TYPE_   integer(LONG_KIND)
#define REDUCE_VAL_   maxval
#define REDUCE_LOC_   maxloc
#define MPP_REDUCE_   mpp_max
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_i8_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_i8_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_i8_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_i8_5d
#define MPP_TYPE_   integer(LONG_KIND)
#define REDUCE_VAL_   minval
#define REDUCE_LOC_   minloc
#define MPP_REDUCE_   mpp_min
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_i4_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_i4_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_i4_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_i4_5d
#define MPP_TYPE_   integer(INT_KIND)
#define REDUCE_VAL_   maxval
#define REDUCE_LOC_   maxloc
#define MPP_REDUCE_   mpp_max
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_i4_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_i4_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_i4_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_i4_5d
#define MPP_TYPE_   integer(INT_KIND)
#define REDUCE_VAL_   minval
#define REDUCE_LOC_   minloc
#define MPP_REDUCE_   mpp_min
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_2d
#define MPP_EXTRA_INDICES_
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_3d
#define MPP_EXTRA_INDICES_   ,:
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_4d
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_5d
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_2d
#define MPP_EXTRA_INDICES_
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_3d
#define MPP_EXTRA_INDICES_   ,:
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_4d
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_5d
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_2d
#define MPP_EXTRA_INDICES_
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_3d
#define MPP_EXTRA_INDICES_   ,:
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_4d
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_5d
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_2d
#define MPP_EXTRA_INDICES_
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_3d
#define MPP_EXTRA_INDICES_   ,:
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_4d
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_5d
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_2d
#define MPP_EXTRA_INDICES_
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_3d
#define MPP_EXTRA_INDICES_   ,:
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_4d
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_5d
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_2d
#define MPP_EXTRA_INDICES_
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_3d
#define MPP_EXTRA_INDICES_   ,:
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_4d
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_5d
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_r8_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_r8_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_r8_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_r8_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_r8_2d
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_c8_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_c8_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_c8_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_c8_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_c8_2d
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_i8_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_i8_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_i8_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_i8_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_i8_2d
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_l8_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_l8_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_l8_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_l8_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_l8_2d
#define MPP_TYPE_   logical(LONG_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_r4_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_r4_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_r4_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_r4_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_r4_2d
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_c4_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_c4_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_c4_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_c4_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_c4_2d
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_i4_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_i4_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_i4_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_i4_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_i4_2d
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_l4_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_l4_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_l4_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_l4_5d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_l4_2d
#define MPP_TYPE_   logical(INT_KIND)

Functions/Subroutines

subroutine, public mpp_domains_mod_oa::mpp_domains_init (flags)
subroutine, public mpp_domains_mod_oa::mpp_domains_set_stack_size (n)
subroutine, public mpp_domains_mod_oa::mpp_domains_exit ()
logical mpp_domains_mod_oa::mpp_domain1D_eq (a, b)
logical mpp_domains_mod_oa::mpp_domain1D_ne (a, b)
logical mpp_domains_mod_oa::mpp_domain2D_eq (a, b)
logical mpp_domains_mod_oa::mpp_domain2D_ne (a, b)
subroutine mpp_domains_mod_oa::mpp_copy_domains1D (domain_in, domain_out, halo)
subroutine mpp_domains_mod_oa::mpp_copy_domains2D (domain_in, domain_out, xhalo, yhalo)
subroutine mpp_domains_mod_oa::mpp_define_domains1D (global_indices, ndivs, domain, pelist, flags, halo, extent, maskmap, offset)
logical if_overlap (hs, he, cs, ce, os, oe)
subroutine mpp_domains_mod_oa::mpp_define_domains2D (global_indices, layout, domain, pelist, xflags, yflags, xhalo, yhalo, xextent, yextent, maskmap, offsetx, offsety, name)
subroutine, public mpp_domains_mod_oa::mpp_broadcast_domain (domain)
subroutine mpp_domains_mod_oa::compute_overlaps (domain)
subroutine mpp_domains_mod_oa::mpp_define_layout2D (global_indices, ndivs, layout)
subroutine mpp_domains_mod_oa::mpp_get_compute_domain1D (domain, begin, end, size, max_size, is_global)
subroutine mpp_domains_mod_oa::mpp_get_data_domain1D (domain, begin, end, size, max_size, is_global)
subroutine mpp_domains_mod_oa::mpp_get_global_domain1D (domain, begin, end, size, max_size)
subroutine mpp_domains_mod_oa::mpp_get_compute_domain2D (domain, xbegin, xend, ybegin, yend, xsize, xmax_size, ysize, ymax_size, x_is_global, y_is_global)
subroutine mpp_domains_mod_oa::mpp_get_data_domain2D (domain, xbegin, xend, ybegin, yend, xsize, xmax_size, ysize, ymax_size, x_is_global, y_is_global)
subroutine mpp_domains_mod_oa::mpp_get_global_domain2D (domain, xbegin, xend, ybegin, yend, xsize, xmax_size, ysize, ymax_size)
subroutine, public mpp_domains_mod_oa::mpp_get_domain_components (domain, x, y)
subroutine mpp_domains_mod_oa::mpp_get_compute_domains1D (domain, begin, end, size)
subroutine mpp_domains_mod_oa::mpp_get_compute_domains2D (domain, xbegin, xend, xsize, ybegin, yend, ysize)
subroutine mpp_domains_mod_oa::mpp_get_pelist1D (domain, pelist, pos)
subroutine mpp_domains_mod_oa::mpp_get_pelist2D (domain, pelist, pos)
subroutine mpp_domains_mod_oa::mpp_get_layout1D (domain, layout)
subroutine mpp_domains_mod_oa::mpp_get_layout2D (domain, layout)

Variables

character(len=128), private mpp_domains_mod_oa::version = '$Id: mpp_domains_mod_oa.F90 2826 2010-12-10 11:14:21Z valcke $'
character(len=128), private mpp_domains_mod_oa::tagname = '$Name$'
character(len=128), private mpp_domains_mod_oa::version_update_domains2D
character(len=128), private mpp_domains_mod_oa::version_global_reduce
character(len=128), private mpp_domains_mod_oa::version_global_sum
character(len=128), private mpp_domains_mod_oa::version_global_field
integer, parameter, private mpp_domains_mod_oa::GLOBAL = 0
integer, parameter, private mpp_domains_mod_oa::CYCLIC = 1
integer, parameter, private mpp_domains_mod_oa::WEST = 2
integer, parameter, private mpp_domains_mod_oa::EAST = 3
integer, parameter, private mpp_domains_mod_oa::SOUTH = 4
integer, parameter, private mpp_domains_mod_oa::NORTH = 5
integer, parameter, private mpp_domains_mod_oa::SEND = 1
integer, parameter, private mpp_domains_mod_oa::RECV = 2
integer, parameter, public mpp_domains_mod_oa::GLOBAL_DATA_DOMAIN = 2**GLOBAL
integer, parameter, public mpp_domains_mod_oa::CYCLIC_GLOBAL_DOMAIN = 2**CYCLIC
integer, parameter, private mpp_domains_mod_oa::AGRID = 0
integer, parameter, private mpp_domains_mod_oa::BGRID = 1
integer, parameter, private mpp_domains_mod_oa::CGRID = 2
integer, parameter, public mpp_domains_mod_oa::BGRID_NE = BGRID+2**NORTH+2**EAST
integer, parameter, public mpp_domains_mod_oa::BGRID_SW = BGRID+2**SOUTH+2**WEST
integer, parameter, public mpp_domains_mod_oa::CGRID_NE = CGRID+2**NORTH+2**EAST
integer, parameter, public mpp_domains_mod_oa::CGRID_SW = CGRID+2**SOUTH+2**WEST
integer, private mpp_domains_mod_oa::grid_offset_type = AGRID
integer, parameter, public mpp_domains_mod_oa::FOLD_WEST_EDGE = 2**WEST
integer, parameter, public mpp_domains_mod_oa::FOLD_EAST_EDGE = 2**EAST
integer, parameter, public mpp_domains_mod_oa::FOLD_SOUTH_EDGE = 2**SOUTH
integer, parameter, public mpp_domains_mod_oa::FOLD_NORTH_EDGE = 2**NORTH
integer, parameter, public mpp_domains_mod_oa::WUPDATE = 2**WEST
integer, parameter, public mpp_domains_mod_oa::EUPDATE = 2**EAST
integer, parameter, public mpp_domains_mod_oa::SUPDATE = 2**SOUTH
integer, parameter, public mpp_domains_mod_oa::NUPDATE = 2**NORTH
integer, parameter, public mpp_domains_mod_oa::XUPDATE = WUPDATE+EUPDATE
integer, parameter, public mpp_domains_mod_oa::YUPDATE = SUPDATE+NUPDATE
integer, parameter, public mpp_domains_mod_oa::BITWISE_EXACT_SUM = 1
type(domain1D), public mpp_domains_mod_oa::NULL_DOMAIN1D
type(domain2D), public mpp_domains_mod_oa::NULL_DOMAIN2D
integer, private mpp_domains_mod_oa::pe
integer, private mpp_domains_mod_oa::tk
logical, private mpp_domains_mod_oa::verbose = .FALSE.
logical, private mpp_domains_mod_oa::debug = .FALSE.
logical, private mpp_domains_mod_oa::domain_clocks_on = .FALSE.
logical, private mpp_domains_mod_oa::module_is_initialized = .FALSE.
integer, parameter, public mpp_domains_mod_oa::MPP_DOMAIN_TIME = MPP_DEBUG+1
integer mpp_domains_mod_oa::send_clock = 0
integer mpp_domains_mod_oa::recv_clock = 0
integer mpp_domains_mod_oa::unpk_clock = 0
integer mpp_domains_mod_oa::wait_clock = 0
integer mpp_domains_mod_oa::pack_clock = 0
integer mpp_domains_mod_oa::pack_loop_clock = 0
real(DOUBLE_KIND), dimension(:),
allocatable, private 
mpp_domains_mod_oa::mpp_domains_stack
integer, private mpp_domains_mod_oa::mpp_domains_stack_size = 0
integer, private mpp_domains_mod_oa::mpp_domains_stack_hwm = 0
integer, dimension(16) mpp_domains_mod_oa::domain_info_buf

Define Documentation

#define MPP_EXTRA_INDICES_
#define MPP_EXTRA_INDICES_   ,:
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_EXTRA_INDICES_
#define MPP_EXTRA_INDICES_   ,:
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_EXTRA_INDICES_
#define MPP_EXTRA_INDICES_   ,:
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_EXTRA_INDICES_
#define MPP_EXTRA_INDICES_   ,:
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_EXTRA_INDICES_
#define MPP_EXTRA_INDICES_   ,:
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_EXTRA_INDICES_
#define MPP_EXTRA_INDICES_   ,:
#define MPP_EXTRA_INDICES_   ,:,:
#define MPP_EXTRA_INDICES_   ,:,:,:
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_i4_2d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_l4_2d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_r8_2d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_c8_2d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_i8_2d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_l8_2d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_r4_2d
#define MPP_GLOBAL1D_FIELD_2D_   mpp_global_field1D_c4_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_l4_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_r8_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_i8_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_c8_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_l8_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_r4_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_c4_2d
#define MPP_GLOBAL_FIELD_2D_   mpp_global_field2D_i4_2d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_i4_3d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_l4_3d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_r8_3d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_c8_3d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_i8_3d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_l8_3d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_r4_3d
#define MPP_GLOBAL_FIELD_3D_   mpp_global_field2D_c4_3d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_i4_4d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_l4_4d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_r8_4d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_c8_4d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_i8_4d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_r4_4d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_c4_4d
#define MPP_GLOBAL_FIELD_4D_   mpp_global_field2D_l8_4d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_i8_5d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_i4_5d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_l4_5d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_r4_5d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_r8_5d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_c8_5d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_l8_5d
#define MPP_GLOBAL_FIELD_5D_   mpp_global_field2D_c4_5d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_i4_2d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_i4_2d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_r8_2d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_r8_2d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_r4_2d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_r4_2d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_max_i8_2d
#define MPP_GLOBAL_REDUCE_2D_   mpp_global_min_i8_2d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_i4_3d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_i4_3d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_r8_3d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_r8_3d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_i8_3d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_r4_3d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_min_r4_3d
#define MPP_GLOBAL_REDUCE_3D_   mpp_global_max_i8_3d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_i4_4d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_i4_4d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_r8_4d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_r8_4d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_r4_4d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_r4_4d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_max_i8_4d
#define MPP_GLOBAL_REDUCE_4D_   mpp_global_min_i8_4d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_i8_5d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_i4_5d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_i4_5d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_r8_5d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_r8_5d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_r4_5d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_min_r4_5d
#define MPP_GLOBAL_REDUCE_5D_   mpp_global_max_i8_5d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_2d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_3d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_4d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r8_5d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_2d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_3d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_4d
#define MPP_GLOBAL_SUM_   mpp_global_sum_r4_5d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_2d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_3d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_4d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c8_5d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_2d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_3d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_4d
#define MPP_GLOBAL_SUM_   mpp_global_sum_c4_5d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_2d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_3d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_4d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i8_5d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_2d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_3d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_4d
#define MPP_GLOBAL_SUM_   mpp_global_sum_i4_5d
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_i4_2D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_l8_2D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_l4_2D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_r8_2D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_c8_2D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_r4_2D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_i8_2D
#define MPP_REDISTRIBUTE_2D_   mpp_redistribute_c4_2D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_i4_3D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_c8_3D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_l8_3D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_l4_3D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_c4_3D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_r4_3D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_i8_3D
#define MPP_REDISTRIBUTE_3D_   mpp_redistribute_r8_3D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_i4_4D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_l4_4D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_l8_4D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_c8_4D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_r8_4D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_i8_4D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_r4_4D
#define MPP_REDISTRIBUTE_4D_   mpp_redistribute_c4_4D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_r8_5D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_c4_5D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_i4_5D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_i8_5D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_l8_5D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_l4_5D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_c8_5D
#define MPP_REDISTRIBUTE_5D_   mpp_redistribute_r4_5D
#define MPP_REDUCE_   mpp_min
#define MPP_REDUCE_   mpp_max
#define MPP_REDUCE_   mpp_min
#define MPP_REDUCE_   mpp_max
#define MPP_REDUCE_   mpp_max
#define MPP_REDUCE_   mpp_min
#define MPP_REDUCE_   mpp_min
#define MPP_REDUCE_   mpp_max
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_TYPE_   logical(LONG_KIND)
#define MPP_TYPE_   logical(INT_KIND)
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_TYPE_   logical(INT_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   logical(LONG_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_TYPE_   real(DOUBLE_KIND)
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_TYPE_   complex(FLOAT_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   integer(LONG_KIND)
#define MPP_TYPE_   real(FLOAT_KIND)
#define MPP_TYPE_   complex(DOUBLE_KIND)
#define MPP_TYPE_   integer(INT_KIND)
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_r8_2D
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_i8_2D
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_c8_2D
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_l8_2D
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_l4_2D
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_c4_2D
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_r4_2D
#define MPP_UPDATE_DOMAINS_2D_   mpp_update_domain2D_i4_2D
#define MPP_UPDATE_DOMAINS_2D_V_   mpp_update_domain2D_r8_2Dv
#define MPP_UPDATE_DOMAINS_2D_V_   mpp_update_domain2D_r4_2Dv
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_i4_3D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_r4_3D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_i8_3D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_c8_3D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_r8_3D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_l4_3D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_c4_3D
#define MPP_UPDATE_DOMAINS_3D_   mpp_update_domain2D_l8_3D
#define MPP_UPDATE_DOMAINS_3D_V_   mpp_update_domain2D_r8_3Dv
#define MPP_UPDATE_DOMAINS_3D_V_   mpp_update_domain2D_r4_3Dv
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_i8_4D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_r4_4D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_c8_4D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_r8_4D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_l8_4D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_l4_4D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_c4_4D
#define MPP_UPDATE_DOMAINS_4D_   mpp_update_domain2D_i4_4D
#define MPP_UPDATE_DOMAINS_4D_V_   mpp_update_domain2D_r4_4Dv
#define MPP_UPDATE_DOMAINS_4D_V_   mpp_update_domain2D_r8_4Dv
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_l8_5D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_c8_5D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_c4_5D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_i8_5D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_r8_5D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_r4_5D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_i4_5D
#define MPP_UPDATE_DOMAINS_5D_   mpp_update_domain2D_l4_5D
#define MPP_UPDATE_DOMAINS_5D_V_   mpp_update_domain2D_r8_5Dv
#define MPP_UPDATE_DOMAINS_5D_V_   mpp_update_domain2D_r4_5Dv
#define REDUCE_LOC_   minloc
#define REDUCE_LOC_   minloc
#define REDUCE_LOC_   maxloc
#define REDUCE_LOC_   maxloc
#define REDUCE_LOC_   minloc
#define REDUCE_LOC_   maxloc
#define REDUCE_LOC_   minloc
#define REDUCE_LOC_   maxloc
#define REDUCE_VAL_   minval
#define REDUCE_VAL_   minval
#define REDUCE_VAL_   minval
#define REDUCE_VAL_   maxval
#define REDUCE_VAL_   maxval
#define REDUCE_VAL_   maxval
#define REDUCE_VAL_   minval
#define REDUCE_VAL_   maxval
#define VECTOR_FIELD_
#define VECTOR_FIELD_

Function Documentation

logical mpp_define_domains1D::if_overlap ( integer,intent(in)  hs,
integer,intent(in)  he,
integer,intent(in)  cs,
integer,intent(in)  ce,
integer,intent(out)  os,
integer,intent(out)  oe 
) [private]

Definition at line 1001 of file mpp_domains_mod_oa.F90.

References mpp_domains_mod_oa::debug, max, pe, and mpp_mod_oa::stderr().

Here is the call graph for this function:

 All Data Structures Namespaces Files Functions Variables Defines