Go to the source code of this file.
Defines | |
#define | DEBUG_MG_EXTRA_SEARCH |
Functions/Subroutines | |
subroutine | psmile_neigh_nearx_sub_irr_real (grid_id, x_coords, y_coords, z_coords, coords_shape, mask_array, mask_shape, mask_available, sin_values, cos_values, grid_valid_shape, search_mode, neighbors_3d, num_neigh, nloc, extra_search, ijk, sin_search, cos_search, z_search, jbeg, jend, width, ierror) |
#define DEBUG_MG_EXTRA_SEARCH |
subroutine psmile_neigh_nearx_sub_irr_real | ( | Integer,intent(in) | grid_id, | |
Real,dimension(coords_shape(1,1),intent(in) | x_coords, | |||
Real,dimension(coords_shape(1,1),intent(in) | y_coords, | |||
Real,dimension(coords_shape(1,3),intent(in) | z_coords, | |||
Integer,dimension(2,3),intent(in) | coords_shape, | |||
Logical,dimension (mask_shape (1,1),intent(in) | mask_array, | |||
Integer,dimension (2,3),intent(in) | mask_shape, | |||
Logical,intent(in) | mask_available, | |||
Real,dimension (grid_valid_shape(1,1),intent(in) | sin_values, | |||
Real,dimension (grid_valid_shape(1,1),intent(in) | cos_values, | |||
Integer,dimension(2,2),intent(in) | grid_valid_shape, | |||
Integer,intent(in) | search_mode, | |||
Integer,dimension (ndim_3d, nloc, num_neigh),intent(out) | neighbors_3d, | |||
Integer,intent(in) | num_neigh, | |||
Integer,intent(in) | nloc, | |||
Type (Extra_search_info),intent(inout) | extra_search, | |||
Integer,dimension (ndim_3d, jbeg:jend),intent(in) | ijk, | |||
Real,dimension (jbeg:jend, lat),intent(in) | sin_search, | |||
Real,dimension (jbeg:jend, lat),intent(in) | cos_search, | |||
Real,dimension (jbeg:jend),intent(in) | z_search, | |||
Integer,intent(in) | jbeg, | |||
Integer,intent(in) | jend, | |||
Integer,dimension (ndim_3d),intent(in) | width, | |||
Integer,intent(out) | ierror | |||
) |
Definition at line 11 of file psmile_neigh_nearx_sub_irr_real.F90.
References a, PSMILe::Grids, max, not, PRISM_Error_Alloc, psmile_mg_srch_nneigh_irr_real(), and psmile_srch_nneigh_irreg2_real().
Referenced by psmile_neigh_nearx_irr2_3d_real(), and psmile_neigh_nearx_irreg2_real().