field_add_x_face_from_field Subroutine

public subroutine field_add_x_face_from_field(f, g, set_start, set_end, n_f, nx, ny, nz, n_yb_pad)

f += g on the x faces flagged by set_start/set_end.

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(inout) :: f(SZ,n_f,n_yb_pad*nz)
real(kind=dp), intent(in) :: g(SZ,n_f,n_yb_pad*nz)
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