public interface lacrt
LACRT performs the operation
( c s )( x ) ==> ( x )
( -s c )( y ) ( y )
where c and s are complex and the vectors x and y are complex.
Subroutines
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
cx(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incx |
|
|
complex(kind=sp),
|
intent(inout) |
|
|
:: |
cy(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incy |
|
|
complex(kind=sp),
|
intent(in) |
|
|
:: |
c |
|
|
complex(kind=sp),
|
intent(in) |
|
|
:: |
s |
|
Arguments
| Type |
Intent | Optional | Attributes |
|
Name |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
n |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
cx(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incx |
|
|
complex(kind=dp),
|
intent(inout) |
|
|
:: |
cy(*) |
|
|
integer(kind=ilp),
|
intent(in) |
|
|
:: |
incy |
|
|
complex(kind=dp),
|
intent(in) |
|
|
:: |
c |
|
|
complex(kind=dp),
|
intent(in) |
|
|
:: |
s |
|
Module Procedures