advance_wstar_explicit Subroutine

private subroutine advance_wstar_explicit(phi, gout)

start timing the time advance due to the driving gradients

assume only a single flux surface simulated calculate d/dy in k-space Here g_scratch is in k-space that has been pre-calculated and stored

transform d/dy from ky-space to y-space multiply d/dy with omega_ coefficient and add to source (RHS of GK eqn) get d/dy in k-space omega_ stays in ky,kx,z space with ky,kx,z local multiply d/dy with omega_* coefficient and add to source (RHS of GK eqn)

stop timing the time advance due to the driving gradients

Arguments

Type IntentOptional Attributes Name
complex, intent(in), dimension(:, :, -nzgrid:, :) :: phi
complex, intent(inout), dimension(:, :, -nzgrid:, :, vmu_lo%llim_proc:) :: gout