field_get_x_band Subroutine

public subroutine field_get_x_band(band, f, i_start, nband, ny, nz, n_f, n_yb_pad)

band(i, j, k) = f(i_start + i - 1, j, k) for a DIR_X vertex field

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out)			::	band(nband,ny,nz)
real(kind=dp),	intent(in)			::	f(SZ,n_f,n_yb_pad*nz)
integer,	intent(in)			::	i_start
integer,	intent(in)			::	nband
integer,	intent(in)			::	ny
integer,	intent(in)			::	nz
integer,	intent(in)			::	n_f
integer,	intent(in)			::	n_yb_pad