lacrt Interface

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

public pure subroutine clacrt(n, cx, incx, cy, incy, c, s)

Arguments

Type IntentOptional 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

public pure subroutine zlacrt(n, cx, incx, cy, incy, c, s)

Arguments

Type IntentOptional 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

public interface stdlib_clacrt()

Arguments

None

public interface stdlib_zlacrt()

Arguments

None