Go to the source code of this file.
Defines | |
#define | EXTRA_NORTH_SOUTH_BOUND_CHECK |
Functions/Subroutines | |
subroutine | psmile_neigh_cells_3d_real (use_how, grid_shape, interpolation_mode, cyclic, corner_shape_3d, nbr_corners, corner_x, corner_y, corner_z, search, control, tgt_cell, tgt_corners, npoints, srclocs, msklocs, ncpl, num_neigh, nbr_cells, ierror) |
subroutine | get_tgt_cell (tgt, num_corners, tgt_cell_index) |
subroutine | get_src_cell (src, rotated_src, num_corners, src_cell_index, need_rotation) |
subroutine | rotate_tgt (tgt, rotated_tgt, tgt_num_corners, rotated_src, src_num_corners) |
subroutine | add_gauss_neigh_to_stack (base, stack_entries) |
subroutine | add_neigh_to_stack (base_i, base_j, stack_entries) |
subroutine | add_boundary_to_stack (northern, stack_entries) |
#define EXTRA_NORTH_SOUTH_BOUND_CHECK |
subroutine psmile_neigh_cells_3d_real::add_boundary_to_stack | ( | logical,intent(in) | northern, | |
integer,intent(inout) | stack_entries | |||
) |
Definition at line 1180 of file psmile_neigh_cells_3d_real.F90.
References max.
subroutine psmile_neigh_cells_3d_real::add_gauss_neigh_to_stack | ( | integer,intent(in) | base, | |
integer,intent(inout) | stack_entries | |||
) |
Definition at line 1088 of file psmile_neigh_cells_3d_real.F90.
References max.
subroutine psmile_neigh_cells_3d_real::add_neigh_to_stack | ( | integer,intent(in) | base_i, | |
integer,intent(in) | base_j, | |||
integer,intent(inout) | stack_entries | |||
) |
Definition at line 1146 of file psmile_neigh_cells_3d_real.F90.
subroutine psmile_neigh_cells_3d_real::get_src_cell | ( | type (line_real),dimension(num_corners),intent(out) | src, | |
type (line_real),dimension(num_corners),intent(out) | rotated_src, | |||
integer,intent(in) | num_corners, | |||
integer,dimension(2),intent(in) | src_cell_index, | |||
logical,intent(out) | need_rotation | |||
) |
Definition at line 966 of file psmile_neigh_cells_3d_real.F90.
References psmile_grid::common_grid_range, psmile_grid::pole_threshold, and psmile_transrot_real().
subroutine psmile_neigh_cells_3d_real::get_tgt_cell | ( | type (line_real),dimension(num_corners),intent(inout) | tgt, | |
integer,intent(in) | num_corners, | |||
integer,intent(in) | tgt_cell_index | |||
) |
Definition at line 891 of file psmile_neigh_cells_3d_real.F90.
References max.
subroutine psmile_neigh_cells_3d_real | ( | Integer,dimension(3),intent(in) | use_how, | |
Integer,dimension (2, ndim_3d),intent(in) | grid_shape, | |||
Integer,intent(in) | interpolation_mode, | |||
Logical,dimension (ndim_3d),intent(in) | cyclic, | |||
Integer,dimension(2,3,3),intent(in) | corner_shape_3d, | |||
Integer,dimension(3),intent(in) | nbr_corners, | |||
Real,dimension (corner_shape_3d (1,1,1),intent(in) | corner_x, | |||
Real,dimension (corner_shape_3d (1,1,2),intent(in) | corner_y, | |||
Real,dimension (corner_shape_3d (1,1,3),intent(in) | corner_z, | |||
Type (Enddef_search),intent(inout) | search, | |||
Integer,dimension (2, ndim_3d, search%search_data%npart),intent(in) | control, | |||
Type (real_vector),dimension(ndim_3d),intent(inout) | tgt_cell, | |||
Integer,dimension(ndim_3d),intent(in) | tgt_corners, | |||
Integer,intent(in) | npoints, | |||
Integer,dimension (ndim_3d, npoints),intent(in) | srclocs, | |||
Logical,dimension (npoints),intent(in) | msklocs, | |||
Integer,intent(in) | ncpl, | |||
Integer,intent(in) | num_neigh, | |||
Integer,dimension(ncpl),intent(out) | nbr_cells, | |||
Integer,intent(out) | ierror | |||
) |
Definition at line 19 of file psmile_neigh_cells_3d_real.F90.
References a, add_boundary_to_stack(), add_gauss_neigh_to_stack(), add_neigh_to_stack(), get_src_cell(), get_tgt_cell(), PSMILe::Grids, psmile_debug_trace::ictl, PSMILe::neighcells_3d, not, PRISM_Error_Alloc, psmile_overlap_dble(), and rotate_tgt().
Referenced by psmile_info_trs_loc_3d_reg_real(), psmile_info_trs_loc_gauss2_real(), and psmile_info_trs_loc_irreg2_real().
subroutine psmile_neigh_cells_3d_real::rotate_tgt | ( | type (line_real),dimension(tgt_num_corners),intent(in) | tgt, | |
type (line_real),dimension(tgt_num_corners),intent(out) | rotated_tgt, | |||
integer,intent(in) | tgt_num_corners, | |||
type (line_real),dimension(src_num_corners),intent(in) | rotated_src, | |||
integer,intent(in) | src_num_corners | |||
) |
Definition at line 1042 of file psmile_neigh_cells_3d_real.F90.
References psmile_grid::common_grid_range, and psmile_transrot_real().