field_set_y_face_from_plane Subroutine

public subroutine field_set_y_face_from_plane(f, p_start, p_end, apply_end, n_f, nx, ny, nz, n_yb_pad)

Writes two (nx, nz) planes into the y = 1 and y = ny planes of f. p_end is read only when apply_end is true.

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout) :: f(SZ,n_f,n_yb_pad*nz)
real(kind=dp), intent(in) :: p_start(nx,nz)
real(kind=dp), intent(in) :: p_end(nx,nz)
logical, intent(in) :: apply_end
integer, intent(in) :: n_f
integer, intent(in) :: nx
integer, intent(in) :: ny
integer, intent(in) :: nz
integer, intent(in) :: n_yb_pad