mpp_update_domains2D.h File Reference

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions/Subroutines
subroutine	MPP_UPDATE_DOMAINS_2D_ (field, domain, flags)!updates data domain of 2D field whose computational domains have been computed MPP_TYPE_
ke do je do ie msgsize	if (msgsize.GT.0) then print *
ke do je do ie msgsize mpp_domains_stack_hwm print pos pos *wordlen print	max (mpp_domains_stack_hwm, pos *wordlen) print *
Variables
subroutine intent(inout)	ie
	je
ke do	j = js
ke do je do	i = is
ke do je do ie	pos
ke do je do ie	msgsize
ke do je do ie msgsize	mpp_domains_stack_hwm
ke do je do ie msgsize mpp_domains_stack_hwm print pos *	wordlen
ke do je do ie msgsize mpp_domains_stack_hwm print pos pos *wordlen print	max
ke do je do ie msgsize mpp_domains_stack_hwm print pos pos *wordlen print	mpp_domains_stack_size

---

Function Documentation

ke do je do ie msgsize if

(

msgsize.GT.

0

)

ke do je do ie msgsize mpp_domains_stack_hwm print pos pos* wordlen print max	(	mpp_domains_stack_hwm	,
		pos *	wordlen
	)

subroutine MPP_UPDATE_DOMAINS_2D_	(	field	,
		domain	,
		flags
	)

---

Variable Documentation

ke do je do i = is

Definition at line 131 of file mpp_update_domains2D.h.

ie

Initial value:

 domain%list(m)%send_w%ie
             js = domain%list(m)%send_w%js

Definition at line 122 of file mpp_update_domains2D.h.

Referenced by coasts().

ke do j = js

Definition at line 130 of file mpp_update_domains2D.h.

Referenced by gradient(), gradient_bicubic(), and grids::grid_init().

je

Initial value:

 domain%list(m)%send_w%je
             if( grid_offset_type.NE.AGRID )then
                 is = domain%list(m)%send_w_off%is

Definition at line 123 of file mpp_update_domains2D.h.

ke do je do ie msgsize mpp_domains_stack_hwm print pos pos* wordlen print max

Definition at line 270 of file mpp_update_domains2D.h.

Referenced by mpp_domains_mod_oa::compute_overlaps(), grids::grid_init(), remap_bicubic::grid_search_bicub(), remap_bilinear::grid_search_bilin(), remap_gaussian_weight::grid_search_nbrg(), if_overlap(), mathelp_psmile::ma_fumax_r114(), mathelp_psmile::ma_fumax_r118(), mpp_domains_mod_oa::mpp_define_domains1D(), mpp_domains_mod_oa::mpp_define_layout2D(), mpp_io_mod_oa::mpp_nullify_axistype_array(), mpp_io_mod_oa::write_record(), mpp_io_mod_oa::write_record_b(), and mpp_io_mod_oa::write_record_c().

ke do je do ie msgsize mpp_domains_stack_hwm

Definition at line 270 of file mpp_update_domains2D.h.

Referenced by mpp_domains_mod_oa::mpp_domains_exit().

ke do je do ie msgsize mpp_domains_stack_hwm print pos pos* wordlen print mpp_domains_stack_size

Definition at line 273 of file mpp_update_domains2D.h.

Referenced by mpp_domains_mod_oa::mpp_domains_set_stack_size().

ke do je do ie msgsize

Definition at line 258 of file mpp_update_domains2D.h.

ke do je do ie pos

Initial value:

 pos + 1
                      buffer(pos) = field(i,j,k)
                   end do
                end do
             end do
             call mpp_clock_end(pack_loop_clock)
         end if
         if( send_nw .AND. domain%list(m)%send_nw%overlap )then
             is = domain%list(m)%send_nw%is

Definition at line 132 of file mpp_update_domains2D.h.

ke do je do ie msgsize mpp_domains_stack_hwm print pos* wordlen

Definition at line 270 of file mpp_update_domains2D.h.