public interface rot
ROT applies a plane rotation, where the cos (C) is real and the
sin (S) is complex, and the vectors CX and CY 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 |
|
|
real(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 |
|
|
real(kind=dp),
|
intent(in) |
|
|
:: |
c |
|
|
complex(kind=dp),
|
intent(in) |
|
|
:: |
s |
|
Module Procedures