dsinqi Subroutine

subroutine dsinqi(n, wsave)

Uses

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: n
real(kind=dp), intent(out) :: wsave(*)

Contents

Source Code

dsinqi

Source Code

      subroutine dsinqi(n, wsave)
         use fftpack_kind, only: dp => rk
         implicit none
         integer, intent(in) :: n
         real(dp), intent(out) :: wsave(*)
         call dcosqi(n, wsave)
      end subroutine dsinqi