get_vol_int_one Subroutine

private subroutine get_vol_int_one(a, b, axb, axb_by_mode)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
complex, intent(in), dimension (:,:) :: a
complex, intent(in), dimension (:,:) :: b
complex, intent(out) :: axb
complex, intent(out), dimension (:,:) :: axb_by_mode

Contents

Source Code

get_vol_int_one

Source Code

  subroutine get_vol_int_one (a, b, axb, axb_by_mode)
    implicit none
    complex, dimension (:,:), intent (in) :: a, b
    complex, intent (out) :: axb
    complex, dimension (:,:), intent (out) :: axb_by_mode

    axb_by_mode = conjg(a)*b
    call get_volume_int (axb_by_mode, axb)

  end subroutine get_vol_int_one