fortran-lapack
Loading...
Searching...
No Matches
la_lapack::larft Interface Reference

LARFT: 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. More...

Public Member Functions

pure subroutine clarft (direct, storev, n, k, v, ldv, tau, t, ldt)
 
 la_clarft
 
pure subroutine dlarft (direct, storev, n, k, v, ldv, tau, t, ldt)
 
 la_dlarft
 
 la_qlarft
 
pure subroutine slarft (direct, storev, n, k, v, ldv, tau, t, ldt)
 
 la_slarft
 
 la_wlarft
 
pure subroutine zlarft (direct, storev, n, k, v, ldv, tau, t, ldt)
 
 la_zlarft
 

Detailed Description

LARFT: 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.

Member Function/Subroutine Documentation

◆ clarft()

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

◆ dlarft()

pure subroutine la_lapack::larft::dlarft ( character, intent(in)  direct,
character, intent(in)  storev,
integer(ilp), intent(in)  n,
integer(ilp), intent(in)  k,
real(dp), dimension(ldv,*), intent(in)  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_clarft()

la_lapack::larft::la_clarft

◆ la_dlarft()

la_lapack::larft::la_dlarft

◆ la_qlarft()

la_lapack::larft::la_qlarft

◆ la_slarft()

la_lapack::larft::la_slarft

◆ la_wlarft()

la_lapack::larft::la_wlarft

◆ la_zlarft()

la_lapack::larft::la_zlarft

◆ slarft()

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

◆ zlarft()

pure subroutine la_lapack::larft::zlarft ( character, intent(in)  direct,
character, intent(in)  storev,
integer(ilp), intent(in)  n,
integer(ilp), intent(in)  k,
complex(dp), dimension(ldv,*), intent(in)  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: