average_theta_complex_complex_t Subroutine

private subroutine average_theta_complex_complex_t(a, axb)

Uses

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
complex, intent(in), dimension (-ntgrid:) :: a
complex, intent(out) :: axb

Contents


Source Code

  subroutine average_theta_complex_complex_t (a, axb)
    use theta_grid, only: ntgrid, field_line_average
    implicit none
    complex, dimension (-ntgrid:), intent (in) :: a
    complex, intent (out) :: axb
    axb = field_line_average(a)
  end subroutine average_theta_complex_complex_t