tprfb Interface

public interface tprfb

TPRFB applies a complex "triangular-pentagonal" block reflector H or its conjugate transpose H**H to a complex matrix C, which is composed of two blocks A and B, either from the left or right.


Subroutines

public pure subroutine ctprfb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, a, lda, b, ldb, work, ldwork)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: side
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: direct
character(len=1), intent(in) :: storev
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
integer(kind=ilp), intent(in) :: l
complex(kind=sp), intent(in) :: v(ldv,*)
integer(kind=ilp), intent(in) :: ldv
complex(kind=sp), intent(in) :: t(ldt,*)
integer(kind=ilp), intent(in) :: ldt
complex(kind=sp), intent(inout) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
complex(kind=sp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=sp), intent(out) :: work(ldwork,*)
integer(kind=ilp), intent(in) :: ldwork

public pure subroutine dtprfb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, a, lda, b, ldb, work, ldwork)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: side
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: direct
character(len=1), intent(in) :: storev
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
integer(kind=ilp), intent(in) :: l
real(kind=dp), intent(in) :: v(ldv,*)
integer(kind=ilp), intent(in) :: ldv
real(kind=dp), intent(in) :: t(ldt,*)
integer(kind=ilp), intent(in) :: ldt
real(kind=dp), intent(inout) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=dp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
real(kind=dp), intent(out) :: work(ldwork,*)
integer(kind=ilp), intent(in) :: ldwork

public pure subroutine stprfb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, a, lda, b, ldb, work, ldwork)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: side
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: direct
character(len=1), intent(in) :: storev
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
integer(kind=ilp), intent(in) :: l
real(kind=sp), intent(in) :: v(ldv,*)
integer(kind=ilp), intent(in) :: ldv
real(kind=sp), intent(in) :: t(ldt,*)
integer(kind=ilp), intent(in) :: ldt
real(kind=sp), intent(inout) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=sp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
real(kind=sp), intent(out) :: work(ldwork,*)
integer(kind=ilp), intent(in) :: ldwork

public pure subroutine ztprfb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, a, lda, b, ldb, work, ldwork)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: side
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: direct
character(len=1), intent(in) :: storev
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
integer(kind=ilp), intent(in) :: l
complex(kind=dp), intent(in) :: v(ldv,*)
integer(kind=ilp), intent(in) :: ldv
complex(kind=dp), intent(in) :: t(ldt,*)
integer(kind=ilp), intent(in) :: ldt
complex(kind=dp), intent(inout) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
complex(kind=dp), intent(inout) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=dp), intent(out) :: work(ldwork,*)
integer(kind=ilp), intent(in) :: ldwork

Module Procedures

public interface stdlib_ctprfb()

Arguments

None

public interface stdlib_dtprfb()

Arguments

None

public interface stdlib_stprfb()

Arguments

None

public interface stdlib_ztprfb()

Arguments

None