get_dchidy_4d Subroutine

private subroutine get_dchidy_4d(phi, apar, bpar, dchidy)

Compute d/dy and d/dx in (ky,kx) space where <.> is a gyroaverage d/dy = i * ky * J0 * chi d/dx = i * kx * J0 * chi chi = phi - Z/T * vpa * apar There are different routines depending on the size of the input array TODO-GA: maybe separate for EM and electrostatic Compute d/dy in (ky,kx,z,tube) space

Layouts Parameters Grids Calculations include bpar contribution

Arguments

Type	Intent	Optional	Attributes		Name
complex,	intent(in),		dimension(:, :, -nzgrid:, :)	::	phi
complex,	intent(in),		dimension(:, :, -nzgrid:, :)	::	apar
complex,	intent(in),		dimension(:, :, -nzgrid:, :)	::	bpar
complex,	intent(out),		dimension(:, :, -nzgrid:, :, vmu_lo%llim_proc:)	::	dchidy