CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS THE SECOND COMPONENT OF THE 2-VECTOR (SQRT(DD1)*DX1,SQRT(DD2) DY2)**T. 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). LOCATIONS 2-4 OF DPARAM CONTAIN DH11, DH21, DH12, AND DH22 RESPECTIVELY. (VALUES OF 1._dp, -1._dp, OR 0._dp IMPLIED BY THE VALUE OF DPARAM(1) ARE NOT STORED IN DPARAM.) THE VALUES OF GAMSQ AND RGAMSQ SET IN THE DATA STATEMENT MAY BE INEXACT. THIS IS OK AS THEY ARE ONLY USED FOR TESTING THE SIZE OF DD1 AND DD2. ALL ACTUAL SCALING OF DATA IS DONE USING GAM. More...

Public Member Functions
pure subroutine	drotmg (dd1, dd2, dx1, dy1, dparam)

	la_drotmg

	la_qrotmg

pure subroutine	srotmg (sd1, sd2, sx1, sy1, sparam)

	la_srotmg

Detailed Description

CONSTRUCT THE MODIFIED GIVENS TRANSFORMATION MATRIX H WHICH ZEROS THE SECOND COMPONENT OF THE 2-VECTOR (SQRT(DD1)*DX1,SQRT(DD2) DY2)**T. 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). LOCATIONS 2-4 OF DPARAM CONTAIN DH11, DH21, DH12, AND DH22 RESPECTIVELY. (VALUES OF 1._dp, -1._dp, OR 0._dp IMPLIED BY THE VALUE OF DPARAM(1) ARE NOT STORED IN DPARAM.) THE VALUES OF GAMSQ AND RGAMSQ SET IN THE DATA STATEMENT MAY BE INEXACT. THIS IS OK AS THEY ARE ONLY USED FOR TESTING THE SIZE OF DD1 AND DD2. ALL ACTUAL SCALING OF DATA IS DONE USING GAM.

Member Function/Subroutine Documentation

◆ drotmg()

pure subroutine la_blas::rotmg::drotmg	(	real(dp), intent(inout)	dd1,
		real(dp), intent(inout)	dd2,
		real(dp), intent(inout)	dx1,
		real(dp), intent(in)	dy1,
		real(dp), dimension(5), intent(out)	dparam
	)

◆ la_drotmg()

la_blas::rotmg::la_drotmg

◆ la_qrotmg()

la_blas::rotmg::la_qrotmg

◆ la_srotmg()

la_blas::rotmg::la_srotmg

◆ srotmg()

pure subroutine la_blas::rotmg::srotmg	(	real(sp), intent(inout)	sd1,
		real(sp), intent(inout)	sd2,
		real(sp), intent(inout)	sx1,
		real(sp), intent(in)	sy1,
		real(sp), dimension(5), intent(out)	sparam
	)

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

la_blas.F90