Go to the source code of this file.
Defines | |
#define | ALLOW_DEGRADED_CELL |
Functions/Subroutines | |
subroutine | psmile_mg_final_prev_2d_real (grid_id, nlev, lstijk, xyz, found, newijk, nc, corners1, corners2, corner_shape, nbr_corners, tol, ierror) |
#define ALLOW_DEGRADED_CELL |
subroutine psmile_mg_final_prev_2d_real | ( | Integer,intent(in) | grid_id, | |
Integer,intent(in) | nlev, | |||
Integer,dimension (ndim_2d, nc),intent(in) | lstijk, | |||
Real,dimension (ndim_2d, nc),intent(in) | xyz, | |||
Integer,dimension (nc),intent(out) | found, | |||
Integer,dimension (ndim_2d, nc),intent(out) | newijk, | |||
Integer,intent(in) | nc, | |||
Real,dimension ( corner_shape(1,1),intent(in) | corners1, | |||
Real,dimension ( corner_shape(1,1),intent(in) | corners2, | |||
Integer,dimension(2,2),intent(in) | corner_shape, | |||
Integer,intent(in) | nbr_corners, | |||
Real,intent(in) | tol, | |||
Integer,intent(out) | ierror | |||
) |
Definition at line 11 of file psmile_mg_final_prev_2d_real.F90.
References a, PSMILe::Grids, i5, max, and psmile_mg_control_cell_2d_real().
Referenced by psmile_mg_final_2d_real().