LARZT: forms the triangular factor T of a complex block reflector H of order > n, which is defined as a product of k elementary reflectors. If DIRECT = 'F', H = H(1) H(2) . . . H(k) and T is upper triangular; If DIRECT = 'B', H = H(k) . . . H(2) H(1) and T is lower triangular. If STOREV = 'C', the vector which defines the elementary reflector H(i) is stored in the i-th column of the array V, and H = I - V * T * V**H If STOREV = 'R', the vector which defines the elementary reflector H(i) is stored in the i-th row of the array V, and H = I - V**H * T * V Currently, only STOREV = 'R' and DIRECT = 'B' are supported. More...

Public Member Functions
pure subroutine	clarzt (direct, storev, n, k, v, ldv, tau, t, ldt)

	la_clarzt

pure subroutine	dlarzt (direct, storev, n, k, v, ldv, tau, t, ldt)

	la_dlarzt

	la_qlarzt

pure subroutine	slarzt (direct, storev, n, k, v, ldv, tau, t, ldt)

	la_slarzt

	la_wlarzt

pure subroutine	zlarzt (direct, storev, n, k, v, ldv, tau, t, ldt)

	la_zlarzt

Detailed Description

LARZT: forms the triangular factor T of a complex block reflector H of order > n, which is defined as a product of k elementary reflectors. If DIRECT = 'F', H = H(1) H(2) . . . H(k) and T is upper triangular; If DIRECT = 'B', H = H(k) . . . H(2) H(1) and T is lower triangular. If STOREV = 'C', the vector which defines the elementary reflector H(i) is stored in the i-th column of the array V, and H = I - V * T * V**H If STOREV = 'R', the vector which defines the elementary reflector H(i) is stored in the i-th row of the array V, and H = I - V**H * T * V Currently, only STOREV = 'R' and DIRECT = 'B' are supported.

Member Function/Subroutine Documentation

◆ clarzt()

pure subroutine la_lapack::larzt::clarzt	(	character, intent(in)	direct,
		character, intent(in)	storev,
		integer(ilp), intent(in)	n,
		integer(ilp), intent(in)	k,
		complex(sp), dimension(ldv,*), intent(inout)	v,
		integer(ilp), intent(in)	ldv,
		complex(sp), dimension(*), intent(in)	tau,
		complex(sp), dimension(ldt,*), intent(out)	t,
		integer(ilp), intent(in)	ldt )

◆ dlarzt()

pure subroutine la_lapack::larzt::dlarzt	(	character, intent(in)	direct,
		character, intent(in)	storev,
		integer(ilp), intent(in)	n,
		integer(ilp), intent(in)	k,
		real(dp), dimension(ldv,*), intent(inout)	v,
		integer(ilp), intent(in)	ldv,
		real(dp), dimension(*), intent(in)	tau,
		real(dp), dimension(ldt,*), intent(out)	t,
		integer(ilp), intent(in)	ldt )

◆ la_clarzt()

la_lapack::larzt::la_clarzt

◆ la_dlarzt()

la_lapack::larzt::la_dlarzt

◆ la_qlarzt()

la_lapack::larzt::la_qlarzt

◆ la_slarzt()

la_lapack::larzt::la_slarzt

◆ la_wlarzt()

la_lapack::larzt::la_wlarzt

◆ la_zlarzt()

la_lapack::larzt::la_zlarzt

◆ slarzt()

pure subroutine la_lapack::larzt::slarzt	(	character, intent(in)	direct,
		character, intent(in)	storev,
		integer(ilp), intent(in)	n,
		integer(ilp), intent(in)	k,
		real(sp), dimension(ldv,*), intent(inout)	v,
		integer(ilp), intent(in)	ldv,
		real(sp), dimension(*), intent(in)	tau,
		real(sp), dimension(ldt,*), intent(out)	t,
		integer(ilp), intent(in)	ldt )

◆ zlarzt()

pure subroutine la_lapack::larzt::zlarzt	(	character, intent(in)	direct,
		character, intent(in)	storev,
		integer(ilp), intent(in)	n,
		integer(ilp), intent(in)	k,
		complex(dp), dimension(ldv,*), intent(inout)	v,
		integer(ilp), intent(in)	ldv,
		complex(dp), dimension(*), intent(in)	tau,
		complex(dp), dimension(ldt,*), intent(out)	t,
		integer(ilp), intent(in)	ldt )

The documentation for this interface was generated from the following file:

la_lapack.f90

Public Member Functions