APPLY THE MODIFIED GIVENS TRANSFORMATION, H, TO THE 2 BY N MATRIX (DX**T) , WHERE **T INDICATES TRANSPOSE. THE ELEMENTS OF DX ARE IN (DY**T) DX(LX+I*INCX), I = 0 TO N-1, WHERE LX = 1 IF INCX >= 0, ELSE LX = (-INCX)*N, AND SIMILARLY FOR SY USING LY AND INCY. WITH DPARAM(1)=DFLAG, H HAS ONE OF THE FOLLOWING FORMS.. DFLAG=-1._dp DFLAG=0._dp DFLAG=1._dp DFLAG=-2.D0 (DH11 DH12) (1._dp DH12) (DH11 1._dp) (1._dp 0._dp) H=( ) ( ) ( ) ( ) (DH21 DH22), (DH21 1._dp), (-1._dp DH22), (0._dp 1._dp). SEE ROTMG FOR A DESCRIPTION OF DATA STORAGE IN DPARAM. More...

Public Member Functions
pure subroutine	drotm (n, dx, incx, dy, incy, dparam)

	la_drotm

	la_qrotm

pure subroutine	srotm (n, sx, incx, sy, incy, sparam)

	la_srotm

Detailed Description

APPLY THE MODIFIED GIVENS TRANSFORMATION, H, TO THE 2 BY N MATRIX (DX**T) , WHERE **T INDICATES TRANSPOSE. THE ELEMENTS OF DX ARE IN (DY**T) DX(LX+I*INCX), I = 0 TO N-1, WHERE LX = 1 IF INCX >= 0, ELSE LX = (-INCX)*N, AND SIMILARLY FOR SY USING LY AND INCY. WITH DPARAM(1)=DFLAG, H HAS ONE OF THE FOLLOWING FORMS.. DFLAG=-1._dp DFLAG=0._dp DFLAG=1._dp DFLAG=-2.D0 (DH11 DH12) (1._dp DH12) (DH11 1._dp) (1._dp 0._dp) H=( ) ( ) ( ) ( ) (DH21 DH22), (DH21 1._dp), (-1._dp DH22), (0._dp 1._dp). SEE ROTMG FOR A DESCRIPTION OF DATA STORAGE IN DPARAM.

Member Function/Subroutine Documentation

◆ drotm()

pure subroutine la_blas::rotm::drotm	(	integer(ilp), intent(in)	n,
		real(dp), dimension(*), intent(inout)	dx,
		integer(ilp), intent(in)	incx,
		real(dp), dimension(*), intent(inout)	dy,
		integer(ilp), intent(in)	incy,
		real(dp), dimension(5), intent(in)	dparam
	)

◆ la_drotm()

la_blas::rotm::la_drotm

◆ la_qrotm()

la_blas::rotm::la_qrotm

◆ la_srotm()

la_blas::rotm::la_srotm

◆ srotm()

pure subroutine la_blas::rotm::srotm	(	integer(ilp), intent(in)	n,
		real(sp), dimension(*), intent(inout)	sx,
		integer(ilp), intent(in)	incx,
		real(sp), dimension(*), intent(inout)	sy,
		integer(ilp), intent(in)	incy,
		real(sp), dimension(5), intent(in)	sparam
	)

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

la_blas.F90