add_correction_ffs Subroutine

private subroutine add_correction_ffs(phiin, gin, source_out)

Arguments

Type IntentOptional Attributes Name
complex, intent(in), dimension(:, :, -nzgrid:, :) :: phiin
complex, intent(in), dimension(:, :, -nzgrid:, :, vmu_lo%llim_proc:) :: gin
complex, intent(out), dimension(:, :, -nzgrid:, :, vmu_lo%llim_proc:) :: source_out