Calculate the field-line average (complex values)
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| complex, | intent(in), | dimension (-ntgrid:) | :: | fld_in | ||
| complex, | intent(out) | :: | fld_out |
subroutine get_fldline_avg_c (fld_in, fld_out)
use theta_grid, only: field_line_average, ntgrid
implicit none
complex, dimension (-ntgrid:), intent (in) :: fld_in
complex, intent (out) :: fld_out
fld_out = field_line_average(fld_in)
end subroutine get_fldline_avg_c