Go to the source code of this file.
Functions/Subroutines | |
| subroutine | psmile_mg_next_level_2d_real (grid_id, lev, nlev, chmin1, chmin2, chmax1, chmax2, midp1, midp2, levdim, found, loc, range, coords1, coords2, shape, control, ijkinc, ijkcoa, ierror) |
| subroutine psmile_mg_next_level_2d_real | ( | Integer,intent(in) | grid_id, | |
| Integer,intent(in) | lev, | |||
| Integer,intent(in) | nlev, | |||
| Real,dimension (0:levdim(1),intent(in) | chmin1, | |||
| Real,dimension (0:levdim(1),intent(in) | chmin2, | |||
| Real,dimension (0:levdim(1),intent(in) | chmax1, | |||
| Real,dimension (0:levdim(1),intent(in) | chmax2, | |||
| Real,dimension (0:levdim(1),intent(in) | midp1, | |||
| Real,dimension (0:levdim(1),intent(in) | midp2, | |||
| Integer,dimension(2),intent(in) | levdim, | |||
| Integer,dimension (range(1,1),intent(inout) | found, | |||
| Integer,dimension (ndim_2d, range(1,1),intent(inout) | loc, | |||
| Integer,dimension(2,3),intent(inout) | range, | |||
| Real,dimension (shape(1,1),intent(in) | coords1, | |||
| Real,dimension (shape(1,1),intent(in) | coords2, | |||
| Integer,dimension(2,3),intent(in) | shape, | |||
| Integer,dimension (2, ndim_3d),intent(inout) | control, | |||
| Integer,dimension (ndim_3d),intent(in) | ijkinc, | |||
| Integer,dimension (ndim_2d),intent(in) | ijkcoa, | |||
| integer,intent(out) | ierror | |||
| ) |
Definition at line 11 of file psmile_mg_next_level_2d_real.F90.
References a, i5, psmile_debug_trace::ictl_ind, max, and psmile_mg_prev_levels_2d_real().
Referenced by psmile_mg_search_2d_real().


1.6.1