g_to_f1 Subroutine

private subroutine g_to_f1(g, phi, f)

Uses

compute phi * maxwellian in real space and transform back to k-space phiy = maxwellian * phi Put this back into k-space for future calculations Note that adjust here is (_R - phi) * maxwellian calculate the normalized f, given (_R - phi) f = g + Z/T * ( - phi) * maxwellian f = g + J0 * phi * maxwellian

Arguments

Type IntentOptional Attributes Name
complex, intent(in), dimension(:, :, -nzgrid:, :, vmu_lo%llim_proc:) :: g
complex, intent(in), dimension(:, :, -nzgrid:, :) :: phi
complex, intent(out), dimension(:, :, -nzgrid:, :, vmu_lo%llim_proc:) :: f