larfy Interface

public interface larfy

LARFY applies an elementary reflector, or Householder matrix, H, to an n x n Hermitian matrix C, from both the left and the right. H is represented in the form H = I - tau * v * v' where tau is a scalar and v is a vector. If tau is zero, then H is taken to be the unit matrix.


Subroutines

public pure subroutine clarfy(uplo, n, v, incv, tau, c, ldc, work)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
complex(kind=sp), intent(in) :: v(*)
integer(kind=ilp), intent(in) :: incv
complex(kind=sp), intent(in) :: tau
complex(kind=sp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
complex(kind=sp), intent(out) :: work(*)

public pure subroutine dlarfy(uplo, n, v, incv, tau, c, ldc, work)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
real(kind=dp), intent(in) :: v(*)
integer(kind=ilp), intent(in) :: incv
real(kind=dp), intent(in) :: tau
real(kind=dp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
real(kind=dp), intent(out) :: work(*)

public pure subroutine slarfy(uplo, n, v, incv, tau, c, ldc, work)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
real(kind=sp), intent(in) :: v(*)
integer(kind=ilp), intent(in) :: incv
real(kind=sp), intent(in) :: tau
real(kind=sp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
real(kind=sp), intent(out) :: work(*)

public pure subroutine zlarfy(uplo, n, v, incv, tau, c, ldc, work)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
complex(kind=dp), intent(in) :: v(*)
integer(kind=ilp), intent(in) :: incv
complex(kind=dp), intent(in) :: tau
complex(kind=dp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
complex(kind=dp), intent(out) :: work(*)

Module Procedures

public interface stdlib_clarfy()

Arguments

None

public interface stdlib_dlarfy()

Arguments

None

public interface stdlib_slarfy()

Arguments

None

public interface stdlib_zlarfy()

Arguments

None