lar2v Interface

public interface lar2v

LAR2V applies a vector of complex plane rotations with real cosines from both sides to a sequence of 2-by-2 complex Hermitian matrices, defined by the elements of the vectors x, y and z. For i = 1,2,...,n ( x(i) z(i) ) := ( conjg(z(i)) y(i) ) ( c(i) conjg(s(i)) ) ( x(i) z(i) ) ( c(i) -conjg(s(i)) ) ( -s(i) c(i) ) ( conjg(z(i)) y(i) ) ( s(i) c(i) )


Subroutines

public pure subroutine clar2v(n, x, y, z, incx, c, s, incc)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
complex(kind=sp), intent(inout) :: x(*)
complex(kind=sp), intent(inout) :: y(*)
complex(kind=sp), intent(inout) :: z(*)
integer(kind=ilp), intent(in) :: incx
real(kind=sp), intent(in) :: c(*)
complex(kind=sp), intent(in) :: s(*)
integer(kind=ilp), intent(in) :: incc

public pure subroutine dlar2v(n, x, y, z, incx, c, s, incc)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
real(kind=dp), intent(inout) :: x(*)
real(kind=dp), intent(inout) :: y(*)
real(kind=dp), intent(inout) :: z(*)
integer(kind=ilp), intent(in) :: incx
real(kind=dp), intent(in) :: c(*)
real(kind=dp), intent(in) :: s(*)
integer(kind=ilp), intent(in) :: incc

public pure subroutine slar2v(n, x, y, z, incx, c, s, incc)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
real(kind=sp), intent(inout) :: x(*)
real(kind=sp), intent(inout) :: y(*)
real(kind=sp), intent(inout) :: z(*)
integer(kind=ilp), intent(in) :: incx
real(kind=sp), intent(in) :: c(*)
real(kind=sp), intent(in) :: s(*)
integer(kind=ilp), intent(in) :: incc

public pure subroutine zlar2v(n, x, y, z, incx, c, s, incc)

Arguments

Type IntentOptional Attributes Name
integer(kind=ilp), intent(in) :: n
complex(kind=dp), intent(inout) :: x(*)
complex(kind=dp), intent(inout) :: y(*)
complex(kind=dp), intent(inout) :: z(*)
integer(kind=ilp), intent(in) :: incx
real(kind=dp), intent(in) :: c(*)
complex(kind=dp), intent(in) :: s(*)
integer(kind=ilp), intent(in) :: incc

Module Procedures

public interface stdlib_clar2v()

Arguments

None

public interface stdlib_dlar2v()

Arguments

None

public interface stdlib_slar2v()

Arguments

None

public interface stdlib_zlar2v()

Arguments

None