field_set_y_face Subroutine

public subroutine field_set_y_face(f, c_start, c_end, set_start, set_end, n_f, nx, ny, nz, n_yb_pad)

Sets the bottom (y = 1) and top (y = ny) faces where flagged, so the two y faces can differ (ABL: no-slip floor, free-slip lid).

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout) :: f(SZ,n_f,n_yb_pad*nz)
real(kind=dp), intent(in) :: c_start
real(kind=dp), intent(in) :: c_end
logical, intent(in) :: set_start
logical, intent(in) :: set_end
integer, intent(in) :: n_f
integer, intent(in) :: nx
integer, intent(in) :: ny
integer, intent(in) :: nz
integer, intent(in) :: n_yb_pad