public interface lartv
LARTV applies a vector of complex plane rotations with real cosines
to elements of the complex vectors x and y. For i = 1,2,...,n
( x(i) ) := ( c(i) s(i) ) ( x(i) )
( y(i) ) ( -conjg(s(i)) c(i) ) ( y(i) )
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
x(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incx |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
y(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incy |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
c(*) |
|
|
complex(kind=sp),
|
intent(in) |
|
|
:: |
s(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incc |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
x(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incx |
|
|
real(kind=dp),
|
intent(inout) |
|
|
:: |
y(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incy |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
c(*) |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
s(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incc |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
x(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incx |
|
|
real(kind=sp),
|
intent(inout) |
|
|
:: |
y(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incy |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
c(*) |
|
|
real(kind=sp),
|
intent(in) |
|
|
:: |
s(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incc |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
x(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incx |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
y(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incy |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
c(*) |
|
|
complex(kind=dp),
|
intent(in) |
|
|
:: |
s(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incc |
|
Module Procedures